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Preface 


System/38 Implementation Topics is a mul- 
tivolume set of books designed for students 
who will implement an IBM System/38. This 
Student Materials Book provides the student 
with a course overview, an introduction and 
summary for each module, module exer- 
cises, and sections for notes about each 
part of the course. 


This entire set of books is designed to be 
used in a Guided Learning Center environ- 
ment supplemented by audiovisual material 
and reference manuals. Exercises are in- 
cluded in most modules to be executed on 
the Guided Learning Center's System/38. 
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Section | 


Overview of Implementation Topics 


In the installation of your System/38, you need to integrate many 
different tasks to produce a smooth running system. You need to 
be able to: 


¢ Install the System/38 to meet your requirements 
¢ Control the operation of the System/38 


¢ Execute all your different jobs in a controlled, organized 
manner 


e Utilize System/38 functions to support your applications 
e Prepare for and recover from loss of information 


And, you must address each of these needs in a planned fashion 
to make the best use of your resources. This is called implemen- 
tation. Implementation is the blending of all your previous design, 
application development, and coding activities into an efficient 
system to meet your data processing needs. 


Each of the modules in this course covers different aspects of 
system implementation. Taken together, they form an installa- 
tion plan for your applications on the System/38. The modules 
describe the tasks you must address as an implementor and the 
System/38 tools available to assist you. The modules that make 
up this course are: 


e Module 1... System Installation 

¢ Module 2. . . Security 

e Module 3... Work Management 

¢ Module 4. . . Control Language Programming 

¢ Module 5... Source Entry Utility Additional Topics 
¢ Module 6 . . . Message Handling 

e Module 7 .. . Data Base Topics 

e Module 8. . . Save/Restore 


The topics are arranged in the order that you, the implementor, 
might address them. 


Section! 1 


Implementation Considerations 
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The primary objective of your System/38 education to date has 
been to prepare you to code, test, and execute application pro- 
grams. However, you need more than just programs to.have a 
complete, usable application. In addition to the application pro- 
grams, you need system functions and operating procedures. 


The implementation Topics course defines these additional pieces 
and ties them together. It is planning how all these pieces will op- 
erate on a daily basis. Implementation is the integration of your 
application programs and the functions of the System/38 in a 
planned fashion for efficient daily operation. 


However, just what needs to be planned? What system functions 
and operating capabilities are available and how are they tied to- 
gether with your application programs? In other words, what 
needs to be implemented? Your system implementation consider- 
ations are the major topics of this course. 


WORK 


MANAGEMENT 
SAVE/ 
RESTORE 


CONTROL 
LANGUAGE 


SYSTEM 
INSTALLATION 


MESSAGE 
HANDLING 





Installation . . . Before any application can run, your System/38 
must be installed. You must tailor the System/38 to meet your 
specific needs. Since you must install your devices and pro- 
gram products before you can use your System/38, system in- 
Stallation is your first implementation consideration. 


Security . . . Once your System/38 is installed, you need to be 
able to control who has access to what and perhaps limit the 
functions a user can perform. The security module introduces 
you to the aids provided by the System/38 to help you pre- 
vent unauthorized access to your system and objects. 


Work Management. . . How does a job flow within the sys- 
tem from initiation to completion? How can you control that 
flow? The work management function of CPF controls how 
jobs are handled within the system. The work management 
module identifies the elements of work management and how 
you can implement them to meet your needs. 


Control Language Programming . . . To facilitate the execution 
of jobs, you can build a menu of desired items from which jobs 
are selected by number. Also, you need to build in techniques 
to check for and perhaps change system conditions as a job is 
executing. Control language and control language programs 
give you these capabilities, and more. Module 4 shows you 
how to implement these functions. 


SEU Additional Topics . . . As you code high level language 
programs and control language programs, you need to be able 
to enter them into your System/38 quickly and easily. You 
used SEU in your earlier System/38 education. This module 
adds to your knowledge of SEU, making it an even more useful 
implementation tool. 


Message Handling . . . You may have to communicate with an- 
other user. During the execution of different jobs, the system 
may have a message for you, or a program may send or re- 
ceive a message. The message handling module covers com- 
munication between you and the System/38 and how to 
implement different types of message processing. 


Section! 3 


e Data Base Topics . . . You were introduced to data base topics ») 
in your earlier System/38 education and are aware of various 
characteristics of data base files. This module expands on 
these topics by addressing implementation considerations for 
file creation and maintenance. It also introduces some new 
System/38 functions you can implement to control your data 
base files. 


e Save/Restore . . . Finally, after your system is installed, your 
application and control language programs are ready, and your 
data base files are in place, you need a way of protecting them 
from loss or damage. The last module shows you the System/ 
38 functions you can implement to prepare for and recover 
from loss or damage to your system and its information. 


WORK 
MANAGEMENT 
SAVE/ 


RESTORE 


CONTROL 
LANGUAGE J 


SYSTEM 
INSTALLATION 


MESSAGE 
HANDLING 
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C 


Implementation Reference Manuals 


As you can imagine, all the implementation topics are explained 
in various System/38 reference manuals. However, where do you 
begin to learn all this material? The course modules are your 
starting point. But, rather than duplicating the reference manuals 
in the course modules, the module texts guide you through the 
material and direct you to appropriate sections of the reference 
manuals. The modules introduce you to the topics and give you a 
basic understanding of them. The reference manuals provide the 
detail. 


You will use several reference manuals during this course and 
later on in your implementation efforts. They are: 


e Source Entry Utility Reference Manual SC21-7722 

¢ Control Program Facility Programmer's Guide SC21-7730 
¢ Control Language Reference Manual SC21-7731 

e Programming Reference Summary SC21-7734 

¢ Operator's Guide SC21-7735 


e Guide to Program Product Installation and Device 
Configuration GC21-7775 


¢ Data Description Specifications manual SC21-7806 
e Problem Determination Guide SC21-7876 


¢ 5250 Information Display System Planning and Site Preparation 
Guide GA21-9337 


¢« IBM 5292 Color Display Station Setup Procedure (GA21-9415) 


Each of these manuals is located in the Guided Learning Center 
Resource Library. Instructions in the module texts direct you to 
the proper reference manual for the topic you are studying. 


You may wish to do extra reading on a topic or another related 
topic at any time. To help you find the many references to each 
System/38 subject, use the Guide to Publication (Master Index 
section), GC21-7726. 


Section! 5 


am. Reference 
us 


Reference 


Implement 
Plan 


Reference 





Reference Manual Usage 
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C Reference Manual Usage 


As you have just read, you will use a number of specific manuals 
throughout this course and, more importantly, when you actually 
begin your implementation efforts. Each manual has its own Ta- 
ble of Contents and an index to help you locate specific informa- 
tion. When the module text directs you to locate a specific topic, 
you should use the Table of Contents or index to do so. The 
three ways you should use the reference manuals are dia- 
grammed on the facing page. 


@ While you are studying a module, a topic is introduced and 
related to the overall implementation effort. You may then 
be directed to a section of a reference manual for coding 
rules or specific details about that topic. You should con- 
sider making a note in your Student Materials Book indicat- 
ing the reference manual location of the information. 


© When you have an exercise to code and want to verify your 
solution, you can check the rules and examples in the appro- 
priate reference manual. For example, you may quickly check 
Control Language commands in the Programming Reference 
Summary or research them in detail in the Control Language 
Reference Manual. 


@ You should not expect to remember everything you study in 
this course or every coding option for every command. After 
| this course is completed and you start to implement your 
w own applications on your System/38, these same reference 
manuals guide you in completing the necessary coding or im- 
plementation activity. 


You should practice using these different reference manuals now 
as you study each module in this course. Become familiar with 
them now and they will help you in the future. 


Section! 7 


Course Structure 
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This Student Materials Book is yours to keep when you complete 
the course. It contains a course overview section — the section 
you are reading now — a Prerequisite Review section, and an Im- 
plementation Notes section. The Implementation Notes section 
contains the Introduction, Progress Checks, Machine Exercise in- 
structions, Personal Notes space, and Summary for each module 
in the course. Since you are asked not to write in the modules 
texts and they are collected by the Administrator, you should re- 
cord any notes, comments, thoughts, or exercise coding here, in 
your Student Materials Book. You should begin and end your 
study of each module in your Student Materials Book. 


As you already know, this course is divided into modules that 
represent your major implementation topics. To further assist you 
in studying the material, each module is divided into sections of 
study called units. Each unit discusses a piece of the major topic. 
Several modules have video presentations and machine exercises 
and most units end with a progress check. 


Most modules have a video presentation about the implementa- 
tion topic. The purpose of a video is to introduce the entire topic 
or focus your study on one portion of a topic. For example, the 
system installation video shows you how to connect work sta- 
tions to your system unit using planning sheets you study in the 
module text. 


Whenever a module has a video presentation, the symbol on the 
left is displayed and the text directs you to the proper videodisc. 
All Implementation Topics presentations are stored in the Guided 
Learning Center library. You can replay any video segment when- 
ever you wish. For example, you may replay a video at the end 
of a module as a review of the topic. 


J 


Progress Checks at the end of most units are self-evaluated 
aan questions to let you know how you are doing. They are identified 
with the symbol shown on the left. The questions are located in 


the Implementation Notes section of your Student Materials 
Book. You should answer these questions based on what you 
have studied in the current unit. Answers to the questions are lo- 
cated in the module. You may, if you wish, use any of the refer- 
ence manuals and review any module text material during the 
progress checks. 


Most of the modules have one or more machine exercises to give 
you practice using some of the implementation tools you study. 
Directions in the module text tell you when to perform a machine 
exercise. The actual instructions for each exercise are here, in 
your Student Materials Book. The symbol to the left identifies a 
machine exercise. These exercises are run on a display station in 
the Guided Learning Center. Be sure to read all the instructions 
carefully before attempting to do the exercise at a display sta- 
tion. Do this so you know what is expected of you before you 
begin. 





The first step of each exercise instructs you to sign on to a work 
station using the password S38IMPL. It is an abbreviation for 
System/38 IMPLementation Topics, the title of this course. This 
password accesses a user profile established especially for Im- 
plementation Topics. When you successfully sign on, the Sys- 
tem/38 Implementation Topics Course Menu, shown below, 
appears on the screen. 


Le ‘sySTEN/a8. IMPLEMENTATION TOPICS 


CENTER YOUR INITIALS) 
ise | (ENTER YOUR INITIALS) 
% ie a eal oman, ENTRY. DISPLAY. 
eee EHOVE EXERCISE MATERTALS _ (ENTER YOUR INITIALS? 


YOUR INITIALS? 
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pun 


Naw) 
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Further instructions in each module exercise tell you what to do 
next. Be sure to enter your initials for the options that ask for 
them. (Use the initials for your first, middle, and last name. If you 
do not have a middle name, just use your first and last name ini- 
tials.) Your initials are used to identify your individual library. 


As you have read, you have reference manual reading assign- 
ments in several of the modules. These assignments are identi- 
fied with the symbol to the left. Again, consider making a note of 
the reference manual topic, chapter and page number in your Stu- 
dent Materials Book. 


The Programming Reference Summary is a very useful quick ref- 
erence when you are coding Control Language commands. Use it 
as a reminder of the parameters needed for the various com- 
mands. You should have a copy of it to use while taking the 
course. 


If you are already familiar with a certain function or are not imple- 
menting a particular feature on your system, you may skip the 
part of the text that discusses it. For example, if you do not have 
magnetic tape as part of your system, you can skip the discus- 
sion of magnetic tape in the Save/Restore module. Skipping any 
part of a module is entirely up to you. Skip options in a module 
are identified by the symbol on the left. 


J 


J 


Prerequisite Review 


Section II 


This course is for the person who will implement applications on 
an IBM System/38. As indicated in the flowchart on the 
following pages, you should have successfully completed the 
System/38 Application Programming course (S2585) before 
taking this course. Optionally, you may have completed either or 
both the RPG Ill and Structured Programming (S2584) and/or the 
System/38 COBOL Workshop. 


This course assumes you have completed the prerequisite 
education. Topics addressed in prior education are referenced 
and, in many cases, expanded in this System/38 Implementation 
Topics course. In Appendix A in the back of this Student 
Materials Book is a brief overview of the System/38 curriculum 
in the Guided Learning Center. If you wish, you can refer to 
Appendix A to locate and study specific System/38 topics from 
any of the courses listed. 


The rest of this section is a review of things you learned in earlier 
courses. It covers items you should already be aware of and be 
prepared to use as you progress through Implementation Topics. 
As appropriate, a reference source is provided if you need to 
study a topic again before you begin Implementation Topics. The 
review questions are divided into four parts. The answers for 
each part begin on the page following the questions. Read each 
question carefully and record your answer in the space provided. 
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This flowchart is provided as a guide to the educational offerings for the System/38. 


System/38 Curriculum 


Symbol 


Programmer/Implementer Sraniticance 


(new to data processing) Sell study or 
Guided Learning 
Cemver Course 





Computer 
Fundamentals 







1 Day 















A2508 





System:38 
Introduction 





¥2382 1 Day 


Programming and 
Design 
Fundamentals 


2 Days 





$2510 












RPG Ill 
Programming 
Fundamentals 


ANS '74 COBOL 
Language 
Fundamentals 














3 Days 4 Days 





$2511 SS 126 








RPG Il 
Programming 
Workshop 







44 Days 





S2512 





Continue with 
System/38 Curriculum 
Programmer/implementer 
(experienced) 





Classroom 
Course 


System/38 Curriculum 
Programmer/implementer 
(experienced) 





System 38 
Fundamentals 







22 Days 






$2651 








System 38 
Application 
Programming 


5'2 Days 









$2585 












RPG II and 
Structured 
Programming 


System 38 
COBOL 
Workshop 






42 Days $2534 





5 Days 









§2584 






System 38 
Implementation 
YOU amy | Topics 
ARE HERE 5 Days 












$2613 





System 38 
Workshop 


$2646 4 Days 











System 38 
Application 
Design 





$2556 5 Days 





System 38 
Measurement 
and Analysis 


$2576 3 Days 








System. 38 
Recovery 
Facilities 

Workshop 


$2607 3 Days 





System 38 
Bisynchronous 
Communication 
Implementation 
Workshop 












$2552 


3 Days 













Communications 






Data 
Communication 
Concepts and 

| Planning 





12 Days 





$2548 


eee 


BISYNCH 


APPC 
— 
















System 38 
Advanced 
Program-to- 
Program 
Communication 
Workshop 
$2598 
















4 Days 
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Part |. General Topics 


1. List at least four types of objects. 


it a A fh Ae mentee RAN N's oF emer 


a a nt NN ES RS TSHR 1 PR re 


2. What is a library? 








3. What is a control language program? 





a A aa te ee tr 





— 


4. Briefly describe interactive processing and batch processing. 


5. What is a qualified object name? 


6. How do you identify a CL variable name in a CL command? 


7. What is a library list? How do you change a library list? 


Review your answers with those on the following pages. 


Section ll 13 





Part |. General Topics — Answers and Discussion 
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1. Your list should contain any four from the list below. 


e Programs ¢ Libraries e Files 
e Job queues ¢ Commands e User profiles 
e Qutput queues ¢ Job descriptions ¢« Data areas 


An object is anything that exists in and occupies space in 
storage and on which operations can be performed. 


(The Control Language Reference Manual chapter titled 
“Summary of CPF Functions and Object Types” contains a list of 
System/38 object types.) 


. A library is an object that serves.as a directory to other 


objects. 


. A-control language, or CL, program is an executable object 


that is created from source consisting entirely of control lan- 
guage commands. 


A CL program executes more quickly than uncompiled com- 
mands because it does not need to be translated into ma- 
chine instructions each time it is used. One common use of 
CL programs is to support menus for your applications. 


(See System/38 Application Programming, Module 15, Unit 
2.) 


. Interactive processing involves interaction between the user 


and the system. A System/38 interactive job is everything 
you do from the time you sign on at a work station until you 
sign off. 


Batch processing involves using one or more programs to 
process a group of data records. Little or no interaction 
takes place between the user and the system while a batch 
program is processing. 


(See System/38 Application Programming, Modules 2, 5, 
and 10.) 


5. A qualified object name is the name of the object followed 
by the name of the library in which the object is stored. 
They are connected by a period; for example, 
OBJECT.LIBRARY. 


(See System/38 Control Program Facility Programmer's 
Guide chapter titled ‘‘Objects'’, Accessing Objects.) 


6. A variable field is identified in a CL program with an & as the 
first character of the name. For example, the variable field 
DATE would be coded as &DATE. 


The field is defined in a DCL (Declare CL Variable) statement 
within the CL program or in a display file used by the CL 
program. 


(See System/38 Application Programming, Module 15.) 


7. A library list is an ordered list of library names used to find 
an object. The library list indicates which libraries to search 
and the order in which they are to be searched for an object. 
If an object is in multiple libraries, you get the first one 
found, unless you use a qualified object name. 


A library list can be changed with the RPLLIBL (Replace Li- 
brary List) command, the ADDLIBLE (Add Library List Entry) 
command, or the RMVLIBLE (Remove Library List Entry) 
command. 


(See System/38 Control Program Facility Programmer's 
Guide chapter titled ‘‘Objects’’, Using a Library List.) 


Continue with Part ll of the review on the next page. 
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Part Il. Source Entry 


J 


8. Assume you wish to enter source code for a control lan- 
guage program named CLPROGA into the System/38. What 
entries would you make in the areas marked A, B, and C of 
the Programmer Menu shown below? 


PROGRAMMER MENU 


Select one of the Farloutny': 
Design/execute DFU app 


Design/execute query app 


Create object 
Call program 
Execute command 
Submit job 
Display submitted jobs 
Edit source: 
Design display. format 
Display Menu 
Sign off . ae 
Types: nes BASF, BSCE: 


F GRY G, 
Option: Pate: 
Command 


Text: 


Src file QELSRE Sve Lib: 
CF 3-Command entry: 


CBL, 


~C#NOLIST *LIST) 


RPT, TXT 
Type 


CF4-Prompt (3,5 & 6 only?) 





SYSTEM: SNO20054 ” 


(app), , options?) 

Capp), , options) 
object name, type, 
program name 
command 

(job name), 


pgm for CMD, (text) 


(command) 


(srcembr), (type), (text) 
¢srcmbr ) 


(menu ) 


CLP, CMD. CMNF, DFU, 


‘Q—rere 2: 


Ob jst Bek ee 
CF4&-DSPMSG 


DSPF, LF; 


MXDE, PF, PLI, 


Lee requests: “YES 9 
Job 


~ 
-? ‘oe > 
Se 


9. Referring to the Programmer Menu of the previous question, 
where will the source code for CLPROGA be stored in the 
System/38? 
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10. Based on the correct entries on the screen of Question 8, 
the screen below appears. How can you request prompting 
assistance for your input? 





11. You have finished entering the source code for CLPROGA. 
How do you tell SEU you are done? 


Review your answers for Part Il with those on the following 
pages. 


Section ll 17 





Part Il. Source Entry — Answers and Discussion ) 


8. The three entries -¥.@, and @- identify the option you 
want from the Programmer Menu and parameters you wish 
to pass. The correct entries are: 


© 8, for menu option 8, Edit source 
@ CLPROGA, the source member name 


@ CLP, for control language program, the type of state- 
ments you want to enter 


The completed display is shown below. 





(See System/38 Application Programming, Module 3, Unit 3, 
The Programmer Menu.) 


9. The source for CLPROGA will be stored in the source file 
named OQCLSRC in the library named ITLIBEWH. These val- 
ues come from the Src file: and Src lib: entries at the bot- 
tom of the Programmer’s Menu. 


(See System/38 Application Programming, Module 3, Unit 3, 
The Programmer Menu.) 
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10. To request prompting assistance, key IP** (for Insert with 
Prompting using format **) and press the Enter key. The dis- 
play shown below appears on the screen. Notice the change 
at the bottom of the display. (Note: You could also enter 
IPNC, but your statements would not be syntax checked.) 





(See System/38 Application Programming, Module 4, Unit 4, 
Online Method (SEU); be sure to view the video 
presentation.) 
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11. To end SEU activity, press CF 1. A display like the one be- S) 
low appears. You can change the values shown on this dis- 


play, return to SEU activity, or press the Enter key to end 
SEU. 





Continue with Part Ill of the review on the next page. 
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C Part Ill. Control Language Commands 


Refer to the command syntax diagram shown below to answer 
Questions 12, 13, and 14. 


“LIBL 
CALL ——— PGM program—name 
Jjibrary name 


Required 
Optional 


Job:B,| Pgm:B,I 


12. What, if any, parameters are required with the CALL 
command? 


>— PARM parameter —value 
i 40 maximum ae 





13. Code the command to CALL the program APOOS9 located in 
the APLIB library. No parameters are passed to APOOY. 


14. Which, if any, of the commands below is in error and why? 


a CALL PGM(PROO1) PARM(&END) 
b. CALL PROQ2 
Cc. CALL PROO3,PRLIB 
d. CALL PGM(PRO04) + 
PARM (&CHECK) 
e. CALL PGM(PROOS5 PARM(&DATE) 
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15. Briefly describe what is being done with the command 
shown below. 


CRTPF FILE(APPTRN.GLC) SRCFILE (QDDSSRC.GLC) 


16. Adding the following parameters to the CRTPF command 
above would have what affect on the physical file APPTRN? 


MAINT (*REBLD) 


SIZE(5000 500 10) 


Review your answers with those on the next page. 
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c 


Part Ill. Control Language Commands — Answers and Discussion 


12. 


13. 


15. 


16. 


The CALL command has one required parameter — the pro- 
gram name (PGM). 


(See System/38 Application Programming, Module 15, or 
the Control Language Reference Manual chapter ‘‘Format of 
Command Descriptions’’.) 


The command is coded: 


CALL PGM(AP009.APLIB) 
or 
CALL AP009.APLIB 


(See the Control Language Reference Manual chapter titled 
‘Control Language Syntax’’ and the CALL command in the 
same manual.) 


a. CALL PGM(PROO1) is a valid command 
PARM(&END) 


b. CALL PROO2 is a valid command 


c. CALL PROO3,PRLIB is incorrect. If PRLIB is a library 
name used to create a qualified 
object name, a period is used to 
connect the values 
(PROO3.PRLIB). 


If PRLIB is a parameter (PARM) 
value, a blank space should sepa- 
rate it from the PGM value. 


d. CALL PGM(PROO4) + is a valid command. The + (plus 
PARM(&CHECK) sign) indicates the command is 
continued on the next line. 


e. CALL PGM(PROO5 is incorrect. The right parenthesis 
PARM(&DATE) is missing from the PGM value. It 
should be PGM(PROOS5). 


This command is creating a physical file, The file is named 
APPTRN and is stored in the library named GLC. The DDS 
source for this file is in a source file named QDDSSRC also 
in the library named GLC. 


The parameter MAINT(*REBLD) causes the access path to be 
rebuilt each time the file is opened. 


The parameter SIZE(5000 500 10) sets the initial size of the 
file to 5000 records. It can be expanded in groups of 500 
records 10 times. 


(For questions 15 and 16, see System/38 Application Pro- 
gramming, Module 4, Unit 4, File Creation Commands.) 


Continue with Part IV of the review on the next page. 
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Part IV. Command Entry 


17. 


18. 


19. 


20. 


What is the primary function of the Command Entry Display? 





How do you get to the Command Entry Display from the 
Programmer Menu? 


How do you then return to the Programmer Menu? 





What is the use of CF 4 when you are entering a control lan- 
guage command? 


The Command Entry Display below shows a command en- 
tered with a syntax error detected and displayed by CPF. 
How can you easily correct and re-enter the command by 
using a CF key? 


oy 


dt ee ee Sate be Fass 
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C Part IV. Command Entry — Answers and Discussion 


17. The primary function of the Command Entry Display is to al- 
low you to enter control language commands. 


18. To get to the Command Entry Display from the Programmer 
Menu, press CF 3. 


To get back to the Programmer Menu from the Command 
Entry Display, press CF 1. 


19. CF 4 allows you to be prompted for the parameters of a 
command. 


(See System/38 Application Programming, Module 3, Unit 2 
for a review of questions 17, 18, and 19.) 


20. To correct (or re-use) a command already entered on the 
Command Entry Display, first move the cursor to the line 
containing the command you want. 


Next, press CF 3 to duplicate the command on the next 
available line on the Command Entry Display, as shown on 
the display below. 


COMMAND ENTRY: DISPLAY 
tt depltib Lib<aplib output(#sliat) 
Unbalanced parenthesis found 


Error found on command. 
> $¢ deplib LibCaplib output (#list> 


CFS — Duplicate CF4 - Fromp t CF? —- Low level messeges 





(Answer continued on next page.) 
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Position the cursor and correct the error. In the command 
used for the question, the error is an omitted parenthesis. To 
enter it, position the cursor, press the Insert key, and type 
the ) you need. The display below shows the corrected 
command. 
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Press Enter Rec Adv to submit the command to CPF for 
processing. 


(See System/38 Application Programming, Module 3, Unit 2, 
The Command Entry Display.) 


This concludes the review section. If you were unsure about any 
of the answers, you should study the references indicated with 
those answers before continuing with System/38 Implementation 
Topics. 


When you feel you are ready, continue with Section Ill of this 
Student Materials Book. 


WORK 
MANAGEMENT 


SAVE/ 
RESTORE 


CONTROL 
LANGUAGE 


SYSTEM 
INSTALLATION 


MESSAGE 
HANDLING 
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Section III 


Implementation Topics Notes 


The remainder of this book is divided into eight parts, one for 
each module of the course. Within each part you find a brief in- 
troduction to the module, a place for your personal notes, ma- 
chine exercise, progress checks, and a summary of the material 
covered in the module. In addition, some parts have illustrations, 
diagrams, and sample forms to aid your implementation effort. 


e Introduction . . . provides you with an overview of the module 
and lists any reference manuals you may need. Always begin 
your study of a module with the Introduction, here, in your Stu- 
dent Materials Book. 


¢ Personal Notes . . . as you study the various modules in the 
course, certain topics, techniques, or references may be espe- 
cially relevant to your needs. Use the personal notes to record 
these thoughts while they are fresh in your mind. This note 
space should be used to write your answers to any desk exer- 
cises that a module may have. You will have a permanent re- 
cord of your activity if you write all your notes in the same 
place, your Student Materials Book. 


e Machine Exercises . . . to reinforce the material covered. They 
are a means for you to practice what you have studied in the 
text. Directions in the module text tell you when to do a spe- 
cific machine exercise. 


¢ Progress Checks .. . to also reinforce the material covered in a 
study unit. Use it as a review of the information you have 
learned. They are a means for you to see if you understand 
what you have just studied. 


e Summary ... to help you put the module into perspective. 
Notes, diagrams, and comments about the topic’s role in the 
implementation effort are included, as appropriate. Do not hesi- 
tate to add your own thoughts to these notes. 


The text, your personal notes, your Progress Check answers and 
your copies of the System/38 reference manuals become the 
foundation for the implementation of your system. You will use 
them to guide your activities in the installation of new applica- 
tions on your System/38. 


You should now be ready to study the first topic, ‘“System Instal- 
lation’’. The introduction to this topic starts on the next page. 
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Cc Module 1. System Installation 









SYSTEM 
INSTALLATION 


The responsibility of installing your system may lie with one per- 
son or several people in your company. You need to know how 
to install program products and configure devices on your Sys- 
tem/38. Module 1 shows you how to prepare for device configu- 
ration, how to install the Control Program Facility (CPF) and other 
program products, and how to use control language commands 
to configure your devices. 


You may wish to modify your system in accordance with Module 
1 recommendations or you may wish to use your system as you 
receive it from IBM. Module 1 also shows you how to save your 
system once it is installed. 


You should plan for device configuration before your system ar- 
rives. You need to fill out the necessary work sheets provided 

wy and keep them for ready reference and updating whenever you 
add, remove, or relocate devices on your system. 


When your system arrives, use the procedures covered in Mod- 
ule 1 to install CPF, your program products, and to configure 
your devices. To ensure your installation proceeds as smoothly 
as possible, read the Guide To Program Product Installation and 
Device Configuration (GC21-7775) before you actually perform 
the installation activities. 


You will use the following materials as you study this module: 
e The Module 1 text 


¢ IBM System/38 Guide To Program Product Installation and De- 
vice Configuration (GC21-7775) 


e IBM 5250 Information Display System Planning and Site Prepa- 
ration Guide (GA21-9337) 


¢ IBM System/38 Control Language Reference Manual (SC21- 
7731) 


¢ IBM System/38 Control Program Facility Programmer's Guide 
(SC21-7730) 


¢ IBM 5292 Color Display Station Setup Procedure (GA2 1-9415) 


Now begin your study of System Installation in the 
Module 1 text. 
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STUDENT NOTES: Module 1. System Installation 2 


As you proceed through the study module, use these pages to record any notes you feel will 
help you understand the topic. 
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Cc STUDENT NOTES (continued): System Installation 
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SYSTEM INSTALLATION STEPS 


Install 
Languages 


and 
Utilities 





(Save) 
Backup 
System 


EG Plan for device configuration — this con- 


sists of filling out the work sheets for 
your system. You should complete this 
step before your system arrives. 


Install your system, including the Con- 
trol Program Facility (CPF) and the gen- 
eral-purpose library (QGPL). 


Install and verify your languages and 


utilities. 


Describe your configuration (local and 
remote). 


Tailor your system. 


Save your system. 


SYSTEM PRINTER WORK SHEET 


SYSTEM PRINTER 
(CRTDEVD command) 


Description Parameter 


Name of the system printer. R DEVD 
Physical address of the device: R DEVADR 
Device Entry 
First system printer 
3262 or 5211 000018 
3203 or 4245 000040 
Second system printer 
3262 or 5211 000058 
3203 or 4245 000040 If first system printer is a 3262 or 5211. 
3203 or 4245 000041 If first system printer is a 3203 or 4245. 
Device type (3262, 5211, 3203, or 4245). R DEVTYPE 
Device model. R MODEL 
Device Type Model 
3262 Al 
B1 
5211 2 
3203 5 
4245 12 
20 


The device is to be varied online when CPF is started ONLINE 
(*NO or *YES). 


The name of the default print image. (IBM-supplied print PRTIMG 
image is OSYSIMAGE in QGPL.) 


The authority for this device to be granted to all users PUBAUT 
(*NORMAL, *ALL, or *NONE). 


Brief description of the device. (*BLANK or no more than TEXT 
50 characters in apostrophes.) 


When you are ready, return to the module text to check 
your entries on your work sheet for the first system printer. 





Module 1. System Installation 35 


LOCAL WORK STATION CONTROLLERS >) 


AX. NO. 
OF WORK MAX. NO. 
FEATURE AVAILABLE STATIONS | OF PORTS 


Work Station Controller (WSC) 
(without either expansion feature) 


Work Station Controller (WSC with 


Device Control Expansion feature) 


Work Station Controller (WSC with 
Device Interface Expansion feature) 


Work Station Controller-Extended 
(WSCE) 





Please keep in mind the following guidelines as you configure 
your work stations: 


e A maximum of seven work stations can be attached to a sin- 
gle port. 


e The number of work stations that can be attached to a work 
station controller depends on the type of controller. 


¢ The WSCE does not support the 5251 Model 1 and the 5252 2 
Displays. 
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C Desk Exercise — Unit 1: Pre-installation 


Using the work sheet below, fill out the work sheet for six 5251 
Model 11 display stations and one 5224 Model 1 work station 
printer. These devices are to be attached to the third port, which 
is port number O2, on Controller 1 (WSC1). All stations except 
the printer have the Cable-Thru feature. 


LOCAL WORK STATION CONFIGURATION WORK SHEET 


Ports (use only one): Page of 


Circle one: 

WSC1 WSC2 WSC3 WSC4 
WSCE1 WSCE2 WSCE3 WSCE4 
Control Unit Name 


u 

[Device Name —SSSSSC—~*d 
[Device Type |S 
[Location [|__| 
[Unit Address_ ss 
Port Number | 
[Work Station Address |_| 
a ETS 
ou 


iY 
Device Name [SY 
Device Type [SSS 
Cocation [| 
Unit Address «dT SSCS 
[Port Number | + 
— [Work Station Address_[ 
es 


[Device Name | SS—~—S 
Device Type [SSS 
Location 


Unit Address Unit Address 
Port Number Port Number 


Work Station Address Work Station Address 


Device Name] SS 
Device Type |S 
Location | Ss 


After you complete this exercise, return to the Module text 
to check your work. 





BaQa| 
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5251 REMOTE CONTROLLER — WORK STATION ATTACHMENT GUIDELINES 


2 
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The maximum number of work stations that can be attached 
to each port of a cluster feature is four (using the Cable Thru 
feature). 


The maximum number of work stations that can be attached 
to a cluster feature is four (4 ports per cluster feature). Over- 
all, the maximum number of work stations that can be at- 
tached to the 5251 controller is 8 (with the Dual Cluster 
feature). 


Ports must be used in sequence; CF1 (1 to 4), CF2 (5 to 8). 
See diagram. 


First Attachment on CF2 





First Attachment on CF1 


One work station on each port used must have a work sta- 
tion address of O. Other work station addresses must be 1, 
2, or 3. 


A work station with an address of O must be the last station 
on the port. 


The Cluster feature you select must match one of the config- 
urations shown in the cluster configuration charts in the “‘Re- 
mote Work Station Configuration Using the 5251°’ chapter 
of the IBM 5250 Information Display System Planning and 
Site Preparation Guide (GA21-9337). Please review these 
charts at this time. 


J 


C 


Progress Check — Unit 1: Pre-installation 


Read each question carefully. Record your answers in the space 
provided. 


1. List the 6 steps to install a System/38. 


& CP 

Cc. 4 
) 

v 
Ec 





2. Must all devices be described to the System/38? If yes, 
how? 


; r : 
A ALAS RHE IA SC xt Jd KR YH MNALA *e a. Ad “Lee Led Ct? KY 


y} 


Fa, ah ‘i Pd! “ LA Ad 4 Mb a OY 4 a 





3. What is the purpose of filling out configuration and device 
work sheets before system installation? 


y, y, 
FEL’ Lh o* rh, 4, é. ma. af A HX a. on | ag & E “ “4 AA 4  e. VK 
gf, y/ y 
GMLLA v7. . ae ipa hhrnw And tat AACA 
’ (if 
LA Ay battle — to Onibr- (O27 MeaAnin 
- J, 
CHA AA AACE, COLHNMA ‘na Sd © ie & mas. am A g. he Poe! atl, a, mat Oe 


y f i) Ho rd, Ad (fh, . i/ 
4. Do you have to create device descriptions for the console 
and diskette system devices? 


aew Cl08 CL Ane, 
Ly a a~ 
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5. What feature is required on the work station to attach an- ) 
other work station? | | 


ct£FCC Cable - f) Ice PtiAALHE, + ICL C02 


r f f 


(LLLYHALA rh! Atl £. (L- Att CH TALL A ya O Mena : 2 ng a a 


Law nL, 


6. How many local work stations can be attached (using the 
Cable-Thru feature) to one port on the work station 


controller? 
ah Ae oy tf feC- fd (2 PA CLAY é Le, MD “4 ASF Med Fa a ah Ae 
, ork : 
fi eels / A A 4 K A] ih. A ‘a A, ll all nae 4, 


Skip questions 7 and 8 if you did not study the section on 
Remote Work Stations in the module text. 


7. How many remote work stations can be attached to a clus- 
ter feature on the 5251 Model 12 controller? 






8. What are the 5251 remote controller switches and the func- 
tion of each? 





When you are finished, return to the module and review your an- 
swers with those in the text. 
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C Sample Completed Work Sheets 


The following pages contain the completed work sheets for the 
sample system you have seen in the module text. Use them for 
reference and as a guide to completing the necessary work 
sheets for your system. 


Console 


System/38 


Diskette 
Drive 






3262-A1 me) 
System Station 
Printer Controller 
(First) 
3864 
™ 
4800 BPS 


3864 
Modem SW 


Order 
Entry 
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LOCAL WORK STATION CONFIGURATION WORK SHEET 


Ports (use only one): Page 1 of 2 


Circle one: 

SCD WSC2 WSC3 WSC4 
WSCE1 WSCE2 WSCE3 WSCE4 
Control Unit Name QWSCi_ 


OOOO 
OOOO 









LY 

Device Type | 5251-11 
UnitAddress | DD 
PortNumber dL 
Work Station Address | @@ 
[eae cannes leer 












Device Type [| 5256-3 
ORDER ENTE 

[Unit Address 
Work Station Address | gi 







IDeviceName | Cd 
DeviceType | Cs 
Ree ee 


Location 


Device Name 
Device Type 
ocation 
nit Address 


ort Number 
Work Station Address 
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[Device Name [SSS 
[Device Type | SS 
[Location [SSS 
[Unit Address __—sd[ SOS 
[Port Number | 

fo 







Work Station Address 










[DeviceName | 
[Device Type |S 
[tocation | SSS 
[Unit Address Sd SSCS 
[PortNumber——~+| SS 
[Work Station Address | __—_ 
ee 














[DeviceName | 
[DeviceType [oo 
Location OP 
[Unit Address | 
[PortNumber | 
[Work Station Address {| 
Pe ee ee 






LOCAL WORK STATION CONFIGURATION WORK SHEET 


Ports (use only one): 











Device Name_|wsgo>2 
Device Type | 5292-1 
Location LACCOUNTING 


Unit Address lao 
[PortNumber | OC 
Work Station Address am | 

















[Device Name [SS 
[Device Type | SS 
Location | Ss 
Unit Address SOT SS 
PortNumber sd SSS 
Work Station Address |__| 
ee 
7 












DeviceName [—SSS~—S 
Device Type |S 
[Location |S 
[Unit Address ——S<dYSSSCSCS 
Port Number | 

a 


* 







Work Station Address 
ee ee es 








Device Name 


ere) 
DeviceType_ {| 
ee) 


ocation 


ial 


nit Address 


a 
ort Number Pe es al 
[oe eel 






Work Station Address 


Page_2 of _2 

Circle one: 

(SCD WSC2 WSC3 WSC4 
WSCE1 WSCE2 WSCE3 WSCE4 


Control Unit Name _QWSCi_ 










[Device Name Jo 
DeviceType | 
Location OT 
[UnitAddress | 
[PortNumber | 
[Work Station Address | 


Work Station Address 














[Device Name [SSS 
Device Type [SSS 
Location | SS 
[Unit Address dT 
[Port Number ‘| 
[Work Station Address [| _ 
aaa aaa 
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LOCAL WORK STATION CONTROLLER ) 
(CRTCUD command) 


Description 


Name of the control unit. 
Control unit type identifier (*WSC or *“WSCE). 
Model number of the control unit (NONE): 
Address of the control unit: 
Type — Entry 
WSC1 or WSCE1 0030 
WSC2 or WSCE2 0070 
WSC3 or WSCE3 OOBO 
WSC4 or WSCE4 OOFO 
The control unit is to be varied online when CPF is started (*YES or *NO). ONLINE 


List on this work sheet only (not on the CRTCUD command prompt itself) the name(s) of the devices to DEV 
be attached to this control unit (up to 20 on WSC; up to 32 on WSCE). Do not enter values for the DEV 

parameter on the CRTCUD command prompt. When you create individual device descriptions for display 

devices and work station printers, and you reference this control unit through the CTLU parameter, those 

device names are automatically inserted in the DEV parameter for this control unit. (See the appropriate 

Local Work Station Configuration Work Sheet.) 


(Use additional sheets if necessary.) 


The authority for this control unit to be granted to all users (NORMAL, *ALL, or *NONE). PUBAUT 
Brief description of the control unit. (“BLANK or no more than 50 characters, enclosed in apostrophes.) TEXT 





Work Sheet for a Local Work Station Controller (WSC or WSCE} 
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DISPLAY STATION (PART 1 OF 2) 
(CRTDEVD command) 


Description Parameter 


Name of the display station. (See the appropriate Local Work Station Configuration Work Sheet R DEVD 
or 5250 Communications Network Setup Form.) 


Physical address of the device: R DEVADR 


Control Unit Entry 
WSC or WSCE 000000 
§251 XXYYYY 


.—__—44—- CTLADR parameter values from CRTCUD 
work sheet 
Unit address (00 if device is part of 5251 


Model 2 or 12; 02-05 if attached to first 
cluster; 06-09 if attached to second cluster) 


Device type (5251, 5252, 5291, or 5292). 
Device model: 
Device Type Screen Size 
§251 960 characters 
1920 characters 


5252 960 characters 
(dual) 


5291 1920 characters 1 
5292 1920 characters 1 


Name of associated work station controller or 5251 control unit. (See the appropriate Local CTLU 
Work Station Configuration Work Sheet or 5250 Communications Network Setup Form.) 


This device is varied online when CPF is started (®NO or *YES). ONLINE 





Work Sheet for a Display Station 
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DISPLAY STATION (PART 2 OF 2) 
(CRTDEVD command) 


Description Parameter Entry 


The line connection (switched lines onty) is to be broken after the work station user signs off DROP 
without specifying a value for the DROP parameter on the SIGNOFF command (*NO or *YES). 


Name of the associated work station printer (*NONE or device name). PRINTER WSPR1 


Name of an alternative printer file to be used when no associated work station printer is PRTFILE 
available. 


Address of device: WSCADR @Q@0000 
Control Unit 
5251 000000 


WSC or WSCE XXyyZz 
| L_. Work station address switch settings (00-06) 


Work station controller port number as follows: 


Valid Valid 
wsc Entries WSCE Entries 


WSC1 00-15 WSCE1 00-07 
WwSC2 16-31 WSCE2 = 16-23 
WSC3 32-47 WSCE3 32-39 
WSC4 48-63 WSCE4 48-55 
Unit address (00-19 if WSC; 00-31 if WSCE) 
(See the appropriate Local Work Station Configuration Work Sheet.) 
Type of keyboard (only when display station is connected to WSC or WSCE): WSCKBD TUSB 


Entry 
yzzz 
|____________. 3. character identifier (see CRTDEVD command in CL Reference 
Manual) 
T for typewriter-like keyboard 
{ D for data entry keyboard without proof arrangement 
P for data entry keyboard with proof arrangement 


Application program is to control blinking cursor (*YES or *NO). ALWBLN 
The authority for this device to be granted to all users (NORMAL, ALL, or *NONE). PUBAUT *NORMAL 


Brief description of the device. (“BLANK or no more than 50 characters, enclosed in TEXT 
apostrophes.) 
‘ 
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WORK STATION PRINTER (PART 1 OF 2) 
(CRTDEVD command) 


Description Parameter 


Name of the work station printer. (See the appropriate Local Work Station Configuration Work DEVD 
Sheet or 5250 Communications Network Setup Form.) 


Physical address of the device: DEVADR 
Control Unit Entry 
WSC or WSCE 000000 


5251 XXYYYY 
| L— CTLADR parameter value from CRTCUD work sheet 


Unit address (02-05 if attached to first cluster; 06-09 if 
attached to second cluster) 


(See the appropriate 5250 Communications Network Setup Form.) 
Device type (5219, 5224, 5225, or 5256). 
Device model!: 
Device Type Model _ Entry 


5219 D1 D1 
D2 D2 


5224 1 1 


5225 


5256 


Name of the associated work station controller or 5251 control unit. (See the appropriate Local CTLU 
Work Station Configuration Work Sheet or 5250 Communications Network Setup Form.) 


The device is to be varied online when CPF is started (*NO or *YES). ONLINE 





Work Sheet for a Work Station Printer 
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WORK STATION PRINTER (PART 2 OF 2) 
(CRTDEVD command) 


Description Parameter 


Name of the message queue to which operational messages should be sent. MSGQ 


Address of device: WSCADR 
Control Unit Entry 
5251 000000 
WSC or WSCE XXyyZZ 
| L——— Work station address switch settings (00-06) 


Work station controller port number as follows: 


Valid Valid 
WSC Entries WSCE Entries 


WSC! 00-15 WSCE1 00-07 

WwSC2 16-31 WSCE2 ‘16-23 

WSC3 32-47 WSCE3 32-39 

WSC4 48-63 WSCE4 48-55 

Unit address (00-19 if WSC; 00-31 if WSCE) 
(See the appropriate Local Work Station Configuration Work Sheet.) 


The default font identifier (3 digits: any combination of 0-9) to be used if FONT is not FONT 
specified for a printer file. Required for DEVTYPE (5219; valid only for DEVTYPE(5219)). 


The mode in which paper is to be fed to the printer (*CONT, *CUT, or *AUTOCUT). Valid only FORMFEED 
for DEVTYPE (5219). 


The authority for this device to be granted to all users (*NORMAL, *ALL, or *NONE). PUBAUT *NORMAL 


Brief description of the device. (“BLANK or no more than 50 characters, enclosed in TEXT 
apostrophes.) 
\ 
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DISPLAY STATION (PART 1 OF 2) 
(CRTDEVD command) 


Description Parameter 


Name of the display station. (See the appropriate Local Work Station Configuration Work Sheet R DEVD 
or 5250 Communications Network Setup Form.) 


Physical address of the device: R DEVADR 


Control Unit Entry 
WSC or WSCE 000000 
5251 xxyyyy 


L—_____________. CTLADR parameter values from CRTCUD 
work sheet 
Unit address (00 if device is part of 5251 


Model 2 or 12; 02-05 if attached to first 
cluster; 06-09 if attached to second cluster) 


Device type (5251, 5252, 5291, or 5292). 
Device model: 
Device Type Screen Size 
5251 960 characters 
1920 characters 


5252 960 characters 
(dual) 


5291 1920 characters 1 
5292 1920 characters 1 


Name of associated work station controller or 5251 control unit. (See the appropriate Local CTLU 
Work Station Configuration Work Sheet or 5250 Communications Network Setup Form.) 


This device is varied online when CPF is started ("NO or *YES). ONLINE 
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DISPLAY STATION (PART 2 OF 2) 
(CRTDEVD command) 


Description Parameter 


The line connection (switched lines only) is to be broken after the work station user signs off DROP 
without specifyihg a value for the DROP parameter on the SIGNOFF command (*NO or *YES). 


Name of the associated work station printer (*NONE or device name). PRINTER 


Name of an alternative printer file to be used when no associated work station printer is PRTFILE 
available. 


Address of device: WSCADR 

Control Unit 

5251 000000 

WSC or WSCE xxyyzz 

| L__ Work station address switch settings (00-06) 
Work station controller port number as follows: 
Valid Valid 

wsc Entries WSCE Entries 
WSC1 00-15 WSCE1 00-07 
WSC2 16-31 WSCE2 = 16-23 
WSC3 32-47 WSCE3 32-39 
WSC4 48-63 WSCE4 48-55 
Unit address (00-19 if WSC; 00-31 if WSCE) 


(See the appropriate Local Work Station Configuration Work Sheet.) 
Type of keyboard (only when display station is connected to WSC or WSCE): WSCKBD 


Entry 
yzzz 
|____________ 3. character identifier (see CRTDEVD command in CL Reference 
Manual) 
T for typewriter-like keyboard 
{ D for data entry keyboard without proof arrangement 
P for data entry keyboard with proof arrangement 


Application program is to control blinking cursor (*YES or *NOQ). ALWBLN 
The authority for this device to be granted to all users (*NORMAL, *ALL, or *NONE). PUBAUT 


Brief description of the device. (*BLANK or no more than 50 characters, enclosed in TEXT 
apostrophes.) 


\ : ‘ 4, / 
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REMOTE WORK STATION CONFIGURATION WORK SHEET 


Communications 
attachment (circle one): @ 2 3 


Line Description 
Name: 
















[Control Unit Type | s253-32 
[Display Device Type | s254-41 
(Branch Office | 


Location Reanch © 


it 

[Control UnitName | 
[Control Unit Type | SS 
[Control Unit Address |S 
Telephone] SS 
[Display Device Name | SSS 


Display Device Type |  — | 
Unit Address as 
[Location] 





ba 














Control Unit Name 
Control Unit Type 
Control Unit Address | 
Telephone as 
Display DeviceName[ si 
Display Device type [ 
Unit Address ee 
location [SSCS 
ee ee | 
fi 








Page i of 





OC O 
































[Control Unit Name] ——SS—~S 
[Control Unit type__| SS 
[Control Unit Address |________ 
[Telephone |S 
[Display Device Name |S 
[Display Device Type | 
[Locaton™ [SSCS 
Ee 


[Control Unit Name [SSS 
[Telephone S| SSCS 
Display Device Name |S 
[Display Device Type | SSS 
Unit Adoress | —SSSSS—S 
[Location [SSCS 









[Control UntName [SS 
‘Control Unit Type ——SSSSS—S 
[Control Unit Address |__| 
[Telephone __——s[ SS 
[Display Device Name | ———S—S 
[Display Device Type | ———S—S 
TUnit Address | SS 
[Location [SSS 
ee 
| 





0 

[Control Unit Name] ——S—S 
[Control Unit Type | Ss 
[Control Unit Address | SSS 
Telephone______} Sd 
[Display Device Name | SSS 
Display Device Type_[ 
[Unit Address SCS 
[Location [SCS 
ee ee ee 
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IBM 5250 COMMUNICATIONS NETWORK SETUP FORM (Part 1) 


5251 Model 12 Information 
Name _RCU 
Location Branch Office 
City, State 
Telephone Oo erere Tere cl ae 
Host System Line/Port Number_2@ 
Location Main OF fice 
Telephone _4@4-238- 0009 _ 
Device Type _S251-12 
Controller Station Address _@1 SSE 
Unit Address 00 


Work Station Address i 
Communications Type —ELA 


CE assistance required for communications | Yes 
5251 MODEL 12 DISPLAY STATION line connection? 







MMMM 


Ww 












Each cable to be connected to a / \ 
5251 Model 2 or 12 port should 
have a tag with a number from 1 \ 
through 8. There should be a / 

cable for each port used as indi- / \ 


cated on Part 2 of this form. wi fey ae od ee ane Ne eee ee ee ee 


Connect each cable to the port Controller Station | Communications Line ‘“ 
indicated on its tag. Address Switches $2. ————______ Configuration Switches 


123 476 67 8B 
oO 
= i N 
F 
Set all of the switches to their indicated 
settings. (Switch settings should be 
indicated on the diagram by an X in the 
on or off position.) Use the tip of a 
pencil to push in the upper half (on 


position) or lower half (off position) 
of the switches as indicated. 








Cluster Feature 


OFF Port Switches 
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eae ee ena yen eer eee ee emer 


IBM 5250 COMMUNICATIONS NETWORK SETUP FORM (Part 2) 


Note: Set the address on your work station to your 
assigned work station address as shown in each box. 


——— 


5251 
Model 12 











Thane [Rwapai [> 
Device Te |S25G-2 


Location R 











Work Station Address fs 


Unit Address 


Telephone 















[Name | 
[Device Tyee | SCS 
[Location =| 
[Work Station Adares[ 
unit Address] 
a 
aa 


Telephone 


have 
[Work Station Address[ 
[unit Address] 
erase) 
aE 


Telephone 





Remote Work Stations: IBM 5250 Communications Network Setup Form 


With Dual Cluster Feature 





Device Type | SCs” 
[Location [SS 


Work Station Address i a 
Unit Address aa 















Telephone 





[=] Name | 

[Device Type] 
[Location [oo 
[Work Station Address |_| 


Telephone 








Device Type | 


Location 
Work Station Address 
Unit Address 


Telephone 








Device Type 
Location 

Work Station Address 
Unit Address 


Telephone 
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SDLC PRIMARY LINE (PART 1 OF 2) 
(CRTLIND command) 


Description Parameter 


Name of the line. LIND 
Number that identifies the line: LINNBR 
Line Position Entry Line Position Entry Line Position Entry 
First 20 Fifth 60 Ninth AO 
Second 21 Sixth 61 Tenth Al 
Third 22 Seventh 62 Eleventh A2 
Fourth 23 Eighth Twelfth A3 


Type of line (*SDLCP). 

Type of line connection: 
Connection Type Entry 
Switched *SWT 


Nonswitched *pp 
point-to-point 


Nonswitched multipoint *MP 
The line rate in bits per second (1200, 2000, 2400, 4800, 7200, 9600, 48000, or 56000). RATE 
The modem has the switched network (dial) backup feature (*NO or *YES). Not valid for CNN(*SWT). SWNBKU 
The modem has the data rate select feature (*NO or *YES). SELECT 


Nonreturn to zero inverted transmission decoding method is required (*NO or *YES). NONRTNZ 


System/38 provides clocking function for the line (NO or *YES). CLOCK 
Autocall feature is installed (*NO or *YES). *YES is valid only with CNN(*SWT). AUTOCALL 
Autoanswer feature is installed (*NO or *YES). *YES is valid only with CNN(*SWT). AUTOANS 


System/38 provides answer tone signal to the modem (*NO or *YES). *YES is valid only with ANSTONE 
CNN(*SWT). 


The physical connection is by 2-wire or 4-wire link (2 or 4). WIRE: 
Normal: 
Backup: 


Data communications equipment group (*A, *B, or *C). DCEGRP 

Non-IBM modem is used (*NO or *YES). OEMMDM 

Types of calls for which the line is to be used: SWTCNN 
Type Entry 


Both incoming and *BOTH 
outgoing calls 


gEPID PEREREEE 


Incoming calls only *ANS 

Outgoing calls only *CALL 
The speed at which the line operates (*FULL or *HALF). RATETYPE 
Line connection is dialed manually (*MANUAL) or automatically (*AUTO). Valid only for CNN(*SWT). DIALMODE 
Incoming calls are answered manually (*MANUAL) or automatically (*AUTO). Valid only for CNN(*SWT). ANSMODE 
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SDLC PRIMARY LINE (PART 2 OF 2) 
(CRTLIND command) 


Description Parameter Entry 


Number of delay time units (200 milliseconds each) before the system ends the operation that resets the OTROLY 1 
data terminal ready condition (0-15; 1 is recommended). 


Number of idle time units (53.3 milliseconds each) needed to satisfy idle state time considerations (0-255; IDLETIME 38 
38 is recommended minimum). 


Number of base time units (500 milliseconds each) to receive intelligible data (0-255). NONPRDRCV Va 
Number of retries to be performed before the line is considered inoperative (0-21). RETRY 4 
The line is to be varied online when CPF is started ("NO or *YES). ONLINE #YES 


Valid onty for nonswitched lines. List on this work sheet only (not on the CRTLIND command prompt) the CTLU RCU 
name(s) of the control units to be attached to this line (up to 50). The normal order of configuring 

communications is CRTLIND, CRTCUD, then CRTDEVD. If you follow this order, when you create control 

units that reference this line (through the LINE parameter), the name of the control units are automatically 

inserted in the CTLU parameter for this line. 


(Use additional sheets if necessary.) 
The authority for this line description to be granted to all users (*NORMAL, *°ALL, or *NONE). PUBAUT *NORMAL 
Brief description of the line description (*BLANK or no more than 50 characters in apostrophes.) TEXT 
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6261 CONTROL UNIT 


(CRTCUD command) 
Description Perameter Entry 
Name of the control unit. R CUD RCV 
Control unit type identifier (5251). R TYPE 5251 
Model number of the control unit (2 or 12). R MODEL 42. 
Control unit address (see the appropriate Remote Work Station Configuration Work Sheet): R CTLADR O1G@ 
Type of Line Entry 
Switched xx00, where xx = O1-FE and must be unique on your system. (For IBM 
2400 or 4800 bps Integrated Modems, xx can be one of 
the following values: 04, 05, 06, 07, 08, 09, or xA, xB, xC, 
xD, xE, or xF, where x = 1-9.). 
Nonswitched xxyy, where xx = 0O1-FE and must be unique on the line. (For IBM 2400 or 
4800 bps Integrated Modems, xx can be one of the 
following values: 04, 05, 06, 07, 08, O09, or xA, xB, xC, xD, 
xE, or xF, where x = 1-9.) 
and yy = LINNBR parameter value from CRTLIND work sheet. 
Attached to a switched line (*NO or *YES). SWITCHED *YES 
Name of the nonswitched line to which this control unit is attached ("NONE if attached to a switched line). LINE * NONE 
The modem has the data rate select feature (*NO or *YES). SELECT *#YES 
Telephone number (4 to 16 digits) of this control unit. (See appropriate Remote Work Station TELNBR 4042389999 
Configuration Work Sheet.) Valid only for SWITCHED(*YES) or SWNBKU(®*YES). 
Method to be used to make the initial connection between a switched line and the control unit (*ANS or INLCNN * CALL 
*CALL). Valid only for SWITCHED(*YES) or SWNBKU(®*YES). 
Exchange identifier used to identify this control unit to the remote system or device (O20000xx, where xx EXCHID Q2 2409 O1 
is the switch setting of the controller station address on the 5251). Valid only for SWITCHED(*YES) or 
SWNBKU(®*YES). 
This control unit is to be varied online when CPF is started (*NO or *YES). ONLINE YES 
List of line names that identify the lines that can be connected to this control unit. Valid only for LINLST LINE 2.@ 
SWITCHED(*YES) or SWNBKU(®*YES). 
Note: For each line name specified, a line description by that name must already exist. 
The modem has the switched network (dial) backup feature (*NO or *YES). SWNBKU *NO 
If the connection with this control unit is delayed (for instance, if the 5251 Model 2 or 12 is powered off), DLYFEAT *NIO 
the system attempts to make a connection periodically (*NO or *YES). Valid only for SWITCHED(*NO). 
List on this work sheet only (not on the CRTCUD command prompt itself) the name(s) of the devices to DEV RwSQ@i | 
be attached to this control unit (1-9 remote work stations; see 5250 Communications Network Setup 
Form). Do not enter values for the DEV parameter on the CRTCUD command prompt. When you create 
individual device descriptions for communications devices, and you reference this control unit through the 
CTLU parameter, those device names are automatically inserted in the DEV parameter for this control unit. 
RWSPRiL 
(Use additional sheets if necessary.) aT 
The authority for this control unit to be granted to all users ((NORMAL, *ALL, or *NONE). PUBAUT *NORMAL 
Brief description of the control unit (*BLANK or no more than 50 characters in apostrophes.) TEXT 
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DISPLAY STATION (PART 1 OF 2) 
(CRTDEVD command) 


Description Parameter Entry 


Name of the display station. (See the appropriate Local Work Station Configuration Work Sheet R DEVD RWS) 
or 5250 Communications Network Setup Form.) 


Physical address of the device: R  DEVAOR 2GODOOD 


Control Unit Entry 
WSC or WSCE 000000 


5251 XXYYYY 


L—___—_+_—_—+—_. CTLADR parameter values from CRTCUD 
work sheet 
Unit address (00 if device is part of 5251 


Model 2 or 12; 02-05 if attached to first 
cluster; 06-09 if attached to second cluster) 


Device type (5251, 5252, 5291, or 5292). DEVTYPE 5251 
Device model: MODEL oie oe 
Device Type Screen Size 
5251 960 characters 
1920 characters 


5252 960 characters 
(dual) 


5291 1920 characters 1 
5292 1920 characters 1 


Name of associated work station controller or 5251 control unit. (See the appropriate Local CTLU R Cu 
Work Station Configuration Work Sheet or 5250 Communications Network Setup Form.) 


This device is varied online when CPF is started ("NO or *YES). ONLINE *#YES 





Work Sheet for a Display Station 
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DISPLAY STATION (PART 2 OF 2) 
(CRTDEVD command) 


Description Parameter 


The line connection (switched lines only) is to be broken after the work station user signs off DROP 
without specifying a value for the DROP parameter on the SIGNOFF command (*NO or *YES). 


Name of the associated work station printer (“NONE or device name). PRINTER 


Name of an alternative printer file to be used when no associated work station printer is PRTFILE- 
available. 


Address of device: WSCADR 
Control Unit 
5251 000000 


WSC or WSCE xxyyZZ 
| L_ Work station address switch settings (00-06) 


Work station controller port number as follows: 


Valid Valid 
wsc Entries WSCE Entries 


WSC1 00-15 WSCE1 00-07 
WSC2 16-31 WSCE2_=—« 16-23 
WSC3 32-47 WSCE3 32-39 
WSC4 48-63 WSCE4 48-55 
Unit address (00-19 if WSC; 00-31 if WSCE) 


(See the appropriate Local Work Station Configuration Work Sheet.) 
Type of keyboard (only when display station is connected to WSC or WSCE): WSCKBD 


Entry 
yZZz 
_______ 3-character identifier (see CRTDEVD command in CL Reference 
Manual) 
T for typewriter-like keyboard 
D for data entry keyboard without proof arrangement 
P for data entry keyboard with proof arrangement 
Application program is to control blinking cursor (*YES or *NQ). ALWBLN 
The authority for this device to be granted to all users (*NORMAL, *ALL, or *“NONE). PUBAUT 
Brief description of the device. (*BLANK or no more than 50 characters, enclosed in TEXT 
apostrophes.) 
‘ : 7 : / 





Work Sheet for a Display Station 
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WORK STATION PRINTER (PART 1 OF 2) 
(CRTDEVD command) 


Description Parameter 


Name of the work station printer. (See the appropriate Local Work Station Configuration Work DEVD 
Sheet or 5250 Communications Network Setup Form.) 


Physical address of the device: DEVADR 
Control Unit Entry 
WSC or WSCE 000000 


5251 XXYYYY 
| L——- CTLADR parameter value from CRTCUD work sheet 


Unit address (02-05 if attached to first cluster; 06-09 if 
attached to second cluster) 


(See the appropriate 5250 Communications Network Setup Form.) 
Device type (5219, 5224, 5225, or 5256). 
Device model: 
Device Type Model Entry 


5219 D1 D1 
D2 D2 


5224 1 1 


5225 


5256 


Name of the associated work station controller or 5251 control unit. (See the appropriate Local CTLU 
Work Station Configuration Work Sheet or 5250 Communications Network Setup Form.) 


The device is to be varied online when CPF is started (*NO or *YES). ONLINE 





Work Sheet for a Work Station Printer 
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WORK STATION PRINTER (PART 2 OF 2} 
(CRTDEVD command) 


Description 


Name of the message queue to which operational messages should be sent. 


Address of device: 
Control Unit Entry 
5251 000000 
WSC or WSCE xxyyzz 


| L— Work station address switch settings (00-06) 


Work station controller port number as follows: 


wsc 

WSC1 
WSC2 
Wwsc3 
WwSsC4 


Valid 
Entries 


00-15 
16-31 
32-47 
48-63 


WSCE 

WSCE1 
WSCE2 
WSCE3 
WSCE4 


Valid 
Entries 


00-07 
16-23 
32-39 
48-55 


Unit address (00-19 if WSC; 00-31 if WSCE) 
(See the appropriate Local Work Station Configuration Work Sheet.) 


The default font identifier (3 digits; any combination of 0-9) to be used if FONT is not 
specified for a printer file. Required for DEVTYPE (5219; valid only for DEVTYPE(5219)). 


The mode in which paper is to be fed to the printer (*CONT, *CUT, or *AUTOCUT). Valid only 


for DEVTYPE (5219). 


The authority for this device to be granted to all users (NORMAL, *ALL, or *NONE). 
Brief description of the device. (*BLANK or no more than 50 characters, enclosed in 


apostrophes.) 
‘ 


Work Sheet for a Work Station Printer 
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/ 


Parameter 


MSGQ 


WSCADR 


FONT 


FORMFEED 


PUBAUT *NORMAL 
TEXT 





Cc Library List Considerations 


When setting up a library list: 
e The libraries must exist on the system. 


¢ A library name in QSYSLIBL/QUSRLIBL is ignored at CPF start- 
up, if the library does not exist. 


e Library names in QSYSLIBL/QUSRLIBL cannot be deleted after 
CPF is started. 


¢ Non-existing library prevents the job from starting. 


¢ User must have “operational rights’ to the library or the job is 
not started. 


Operational rights to a library are to: 
¢ Use a library. 

¢« Display the description of a library. 
¢ Place a library in the library list. 


One of the ways to implement security on the System/38 is to 
deny users operational rights to specific libraries. 
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Progress Check — Unit 2: Installing Your System 
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Read each question carefully. Record your answers in the space 
provided. 


1. 


How do you make a permanent change to the library list? 
When dogs the change take effect? 


i/ ¢ a gy fit’ tj ae, a af AL at ¢ 
y Y, 


C S S VA LAAA2ZIC AL Hip 2b 4 O 





Can you create a device description for a control unit that is 
active? 


p f 
/| 4, id A A Fi ra es GA AAALL (L. At i ’ 
¢ f . (/ 


0» ra alt A 4 Ces 4 OO Af AV 
J i 


In what sequence should the descriptions be created for a 
remote configuration? 


When you are finished, return to the module and review your an- 
swers with those in the text. 


J 


C 


Progress Check — Unit 3: Post-installation 


Read each question carefully. Record your answers in the space 
yaa provided. 


1. What is the purpose of the Add Work Station Entry 
oe command? 
y y 


AX {4A Q rth & 4 LA AC A AA AF DD: £ 

CO ‘ Ze. Lot 

WNL Qtlt) a AUK, JDLaALLO LO 
YMAAAL, AA the id peel i hishd Lf Athy 

} fp gf: ,. 
(AL ACRALILAGY FLL LILKA LL Abd 7 hei rym a HLL 
AA rd a Oe i OLE LAA ids AAb AA bh i, ZAM A) 

r{ A V¥HE A 2, y7 Aa, LAD Pe hg rd, a Ahg A 4A 


“4 5 
ALAL MAL Jr. CLACE 


Qn tape es 


2. How is the system saved and how can the system be 


restored? 
ip y 
#0. th farA Lar LO LYRAIO Ch ALATA ALAM 0 ATA MAL WIV 
6 ge yj 
ag 4 VS A IA LIKYI a. tO Oe, fi 4 y) 4 AT JA-4 & od @ ¢ Sorrel 
(} 
A = KVIOLA (nh &. r, ne, hn 4 6 OF Lf Z [x Or APE CALSIUALA 
J i) 2 as Og Os AO fa © 216 # 4 4 4 Y cal 
cpa. 2 
ke MALL VE fA hhc AA he CP 
ALF G AAS atten V/ ILA fo CALA Rl LA AA LUG 


3. Why should the security officer's password be changed? 
if : 


Ake 0 


Kp fn Fhe HEL Z LO ye LH BCAA 


~ 





a | y, 
Or SUVIECAA AA i bAL £avn TDY l/1C XC 71 a0 


the p Gite shouts L Lintich Le Cne poraoye ’ 


4. How can you prevent service dumps and job logs from being 
printed with other output reports? 
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5. Can you add a work station to an active subsystem? ) 


;: y / 
(VO. rs A A CMAHA/LLA ADE Ad Abad “Sd LLLAL a 2 


RQ 


4 ’ 4 (] 
¢ K C/)) LY SLA LRALA £ SZ. A tthg Sound KI Le 4 ja: 4 4 TKR} ane 
; ff | . 


we 






6. What must be done when a work station is changed to an- 
other port on the work station controller? 


rhe. nor) Oclcleeys. = cannot gee che 
Chan gee Dorrice Jad cnt 9 LLOW: (cvG DEV D ) 


7. What format must diskettes have in order to save the 
system? 


Aliskerte ttt be tue che douse) paptoo 
bsa VAST] _f6 


When you are finished, return to the module and review your an- 
swers with those in the text. 
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Module 1 Machine Exercise — Displaying Device Configuration 


The purpose of this machine exercise is to allow you to use Con- 
trol Language commands to: 


¢ Display the device configuration 





¢ Display the control unit status for QWSC1 
¢ Display the device description for your work station 


The exercise requires that you display and/or list the system de- 
vices, local work stations, and remote devices (if any) to provide 
historical information. Also, these commands can be used to de- 
termine the current configuration of your system. 


Read through the entire exercise before you go to the work sta- 
tion so you know in advance what you are expected to do. Make 
any notes, if you wish, to aid you when you are doing the 
exercise. 


1. Sign on to your work station using the password S38IMPL. 
This is the password you will use to sign on to begin each 
exercise. 


After you have successfully signed on, the System/38 Im- 
plementation Topics Course Menu appears on the screen. It 
is shown below. 
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2. On the System/38 Implementation Topics Course Menu, se- ) 
lect option 3 to obtain the Command Entry Display. (Note: 
To select option 3, key a 3 and press the Enter key.) 





66 2ZR30-1020 


You will use the Command Entry Display to enter commands 
for this exercise. It is shown below. 


LIS DRA 
; ress stn: , 
ABE th , 


ESR 


SeHeTAy 
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3. Determine the name of your work station by entering the CL ) 
command DSPJOB and pressing the Enter key. 


A Display Job Menu, similar to the one below, appears. The 
work station name is the same as the job name. Its location 
is shown on the example below. Note the name for your 
work station shown on your display. 





4. After you have noted the name of your work station, press 
CF 1 (Command Key 1) to return to the Command Entry 
Display. 
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5. On the Command Entry Display, enter the Display Device 
Configuration command, DSPDEVCFG, to display the device 
configuration of the Guided Learning Center's System/38. 
For the details on the format of this command, see the mod- 
ule text or the System/38 Control Language Reference 
Manual. 


6. The initial display is for the control unit descriptions. Press 
the Enter key to continue. The Device Configuration Device 
Descriptions display appears on the screen. It should be sim- 
ilar to the one shown below. (Note: If the System/38 you 
are using has remote devices, you must press the Enter key 
one or more times until the Device Configuration Device De- 
scriptions display appears.) 





Look for your work station under the heading ‘‘Device 
Name” on the display. Under the heading ‘’Control Unit 
Name’, determine the controller to which your work station 
is attached. 


Write down the name of the Control Unit for your work sta- 
tion. 
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( 1yo2yss, 10:57:09 
TL/DBV/M 


WS05 
WS08 
WS10 
WS11 
wS12 


WS13 


_ WS14 
“WS15 
WS16 
WS17 
WS18 


The ‘‘Device Status’’ column indicates your work station is 
active — it is online and in use. Other status codes you may 


J 


see are: 

e VRYOFF — The device has been varied offline 
e VRYON — The device is varied online 

e VRYONP — The device is being varied online 


e SIGNON — The device has a sign on display 


. When you have recorded the name of the Control Unit for 


your work station, press the Enter key to return to the Com- 
mand Entry Display. 


. Display the configuration (control unit status) of the control 


unit for your work station with the DSPCTLSTS command. 
See the module text or the System/38 Control Language 
Reference Manual for the format of this command. (Note: If 
you are using a remote work station, do not specify a con- 
trol unit name with the command.) 


Your display should be similar to the one below. 


CONTROL UNIT STATUS DISPLAY 
JOB NAME USER — 


Ws0l SIH geo 


STATUS 
ACTIVE 
ACTIVE 
SIGNON 
SIGNON 
VRYONP 
VRYONP 
VRYONP 
VRYONP 
VRYONP 
VRYONP 
VRYONP 
VRYONP 
VRYONP 
VRYONP 
SIGNON 
VRYONP 
VRYONP 
VRYONP 
VRYONP 


set 


DISPLAY 
DISPLAY 


DISPLAY 


WS19 
cae ON OPTIONS 1 THRU 11 
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Locate your device by work station name. The following in- 
formation is associated with your work station: 


¢ Status — ACTIVE 
e Job Name — the same as your work station name 
e User — S38IMPL 


9. Press the HELP key to obtain the ‘Help For Control Unit Sta- 
tus Display.’’ Your display should be similar to the one 
below. 





10. From the ‘‘Help For Control Unit Status Display’’, determine 
the option to display a device description. 


Write down the option number to display a device descrip- 
tion. 


11. Press the Enter key to return to the ‘Control Unit Status 
Display.”’ 
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12. Display the device description for your work station. To do so, | 
position the cursor on the line with your work station’s name. 
Type the option number you identified in Step 10. Press the 
Enter key. 


Your display should be similar to the one shown below. 





Note that with this display you can actually verify what has 
been configured for the device. You can check such items 
as: 


¢ Name 

¢ Address 

« Device type 
¢ Device model 
¢ Control unit 


¢ Whether the device is to be placed online at CPF startup. 
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13. Press the Enter key once to obtain the next page of the *‘De- 
vice Description’’ display. This display should be similar to 
the one below and show, among other things, whether your 
work station has an associated work station printer. 
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14. Press the Enter key one more time to get the next page of 
the “Device Description’ display. Note the entry ‘‘Work Stn £3 
Controller Address.’ It shows the device address, work sta- 
tion controller port number, and the settings of the address 


switches on the device. 
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15. Press CF 1 to return to the Command Entry Display. 


16. Return to the System/38 Implementation Topics Course 
Menu by entering the command RETURN or pressing CF 1. 


17. From the System/38 Implementation Topics Course Menu, 
select option 90 to sign off the work station. 





This completes the machine exercise for Module 1 — System In- 
Sstallation. Continue with the Exercise Summary on the next page. 
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Exercise Summary 
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You have used commands to verify existing names of the device 
descriptions (configuration objects) for the system configuration 
once CPF is installed. 


You can use the Display Device Configuration (DSPDEVCFG) com- 
mand or Display Control Unit Status (DSPCTLSTS) command to 
display the device names assigned to a particular control unit. 
You can also use the Display Device Status (DSPDEVSTS) to dis- 
play the status of one or all devices on the system. 


You can use the Display Device Description (DSPDEVD) command 
to display the parameter values specified for a particular device 
description, or enter a 2 (as you have done) for the device de- 
scription you want to display when using the DSPCTLSTS or 
DSPDEVSTS command. 


These commands can be used to completely fill in your work 
sheets, if you have not done so. Again, these sheets should be 
retained and kept updated for reference, as a guide for service 
personnel, in the event of expansion or relocation. 


At this time, continue with the Module 1 Summary on the next 
page. 


C Module 1 Summary 


Your Customer Service Representative (CSR) has the responsibil- 
ity for setting up the system unit and all the systems devices. 
The CSR executes diagnostic programs to ensure the hardware is 
working properly. 


You have been taught the steps to install your System/38. They 
are: 










Code 
Work 
Sheets 


Plan for device configuration — code 
system configuration work sheets. 


site Install the Control Program Facility. 
Install 
— Languages Install and verify the languages and 


and utilities. 


Utilities 


Configure Describe the configuration with CL 
Devices commands. 





Tailor Modify the system to your specific 
System needs. 


Save S 
ave your system. 
[= J] | | 


Continue now with the Introduction to Module 2, Security, on the 
next page. 
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C 


Module 2. Security 










WORK aoe 
MANAGEMENT 
SAVE/ 
RESTORE 
CONTROL 


LANGUAGE 






Now that you have installed your System/38, the next step is to 
secure the system. 


The major requirement in the area of security is to prevent unau- 
thorized access to data. Another requirement is to ensure data 
integrity. That is, you must be sure your data is updated only by 
authorized persons. You may have operators located in remote 
areas of the business who may view the work station as their 
own personal computer. Work stations can be used by persons 
who might want to retrieve or alter data which they should not 
be authorized to access. Module 2 shows you how to address 
these requirements of the System/38. 


How much security do you need? If you have too much, you and 
the system become unproductive. If you have none or very little, 
any person can perform most functions after merely signing on. 
You need to decide what level of security provides the best re- 
sults for your needs. 


Perhaps the reason some companies don't protect their informa- 
tion more carefully is that they don't know what it is worth. Ob- 
viously, some companies (such as financial institutions) can place 
a value on account information and figure how much money is 
lost when such data are tampered with. But it is less clear as to 
what is the value of an inventory file. 


A good guideline is to estimate how much business could be lost 
if those files are damaged, or how much it would cost to recon- 
struct the files.. Using this rule, you would quickly realize that you 
can't be without your files without experiencing financial strain. 


You will use the following materials for study of this module: 
¢ Module 2 text 


¢ IBM System/38 Programming Reference Summary (SC21- 
7734) 


¢ IBM System/38 Control Program Facility Programmer’s Guide 
(SC21-7730) 


Begin your study of Security in the Module 2 text now. 
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STUDENT NOTES: Module 2. Security ») 


As you proceed through the study module, use these pages to record any notes you feel will 
help you understand the topic. 
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STUDENT NOTES (continued): Security 
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ONY , 


Progress Check — Unit 1: Physical Security a 


Read each question carefully. Record your answers in the space 
ae provided. 


1. Describe the 3 measures of physical security. 
* a ALA tHe. A464L2G448 fA Ok EO Ot Lhe 6-04 


| 
a. 





2. How can you place a device offline or online? 


When you are finished, return to the module and review your an- 
swers with those in the text. 
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SECURITY COMPONENTS 


User Object 
Profile Authority 
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There are two types of authority on the System/38 — special au- 
thority and object authority. J 


Special authority gives you save system rights and/or job control 
rights. 


Object authority gives you the right to use or control an object. 


System 
Authority 


Special Authority Object Authority 


Object Rights Data Rights 


Save System Job Control 


Rights 


Rights Read Update Add _ Delete 


Object Object ec. Operational 
A Existence 4 Management Rights 





Progress Check — Unit 2: System Security 


Read each question carefully. Record your answers in the space 
ee provided. 


1. List the 2 major components of System/38 security. 


+— 
i : 


2. What is special authority? 
mith Qutkhinily 44 the sght An pen“fgVonw 


a 


4 Cf A v4, ea. L/¥) 4) x Lh uy A hh, ON Ci rae, 7} C if 


* 


LHX A} CT 2 A 4-6 ¥ 4 CAH 4 of 4A 2; J gf] z C/K 





» Al G2 
wey the abnl 
hb Acceda er war Gntirdiral oe Lm Qn 4 


3. Describe object authority. ay ae 
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When you are finished, return to the module and review your an- 
swers with those in the text. 
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Module Summary 
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S) 


Unless keys, combinations, and passwords are changed with rea- 
sonable frequency, once they are compromised, they are com- 
promised for significant periods of time. Further, reasonably 
frequent changes of such items reaffirms to all personnel the con- 
tinuing concern for security. 


In addition to requiring a password to sign on, you could have 
the initial program in the user profile require such personal infor- 
mation as a name or special identification code before using the 
system. 


Limit the number of attempts that anyone can make in logging on 
to the system, in order to limit or deter any guessing. 


Keep a record of all user activity in the system and monitor the 
history log to detect any unusual activity, such as repeated fail- 
ures by someone to enter a correct password. 


Keep in mind that your installation’s security needs should be 
considered whenever application programs are designed. Some 
typical security considerations are 


e System users should have access only to the functions and 
data needed to perform their job. 


¢ Work station users should be able to access and update data 
in the data base only through tested procedures and programs. 2 


You have seen the functions and procedures for implementing se- 
curity on your system. You can implement the security function 
easily by using the system-supplied user profiles and defaults, 
but do not forget to change the passwords. As your applications 
require a higher level of security, you can use the more compre- 
hensive security measures. 


Continue now with the Introduction to Module 3, Work Manage- 
ment, on the next page. 


C 


Module 3. Work Management 








MANAGEMENT 





Now that you know how to install and implement security proce- 
dures for your System/38, the next step is to see how work is 
performed on the system. 


The ability to control the concurrent execution of different units 
of work in different environments is provided by the work man- 
agement facilities. 


Work is defined to the system as a job. Within a job, any num- 
ber of related or unrelated functions can be performed. Thus a 
job is simply made up of whatever sequence of processing ac- 
tions you want to perform. As a job is initiated for execution 
within the system, a set of parameters is defined to control the 
execution of that job. 


All jobs processed in the system execute within an operating en- 
vironment called a subsystem. You may think of a subsystem as 
a segment of main storage where your work is performed. 


You will use the following materials for study of this module: 
¢ Module 3 text 


¢ IBM System/38 Control Program Facility Programmer's Guide 
(SC2 1-7730) 


« IBM System/38 Control Language Reference Manual (SC2 1- 
7731) 


Begin your study of Work Management in the Module 3 text 
now. 
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STUDENT NOTES: Module 3. Work Management 


As you proceed through the study module, use these pages to record any notes you feel will 
help you understand the topic. 
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STUDENT NOTES (continued): Work Management 
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SYSTEM/38 OPERATING ENVIRONMENT ZY 


System 


Subsystem 


Routing Step 





«A 


« The System — contains system values that affect system oper- 
ations. Examples of system values are date, time, and name of 
the controlling subsystem. 


¢« Subsystem — provides the predefined operating environment 
through which CPF processes work. 


e Job — work being or to be processed; the basic unit of 
work on the System/38. 


¢« Routing Step — the process of initiating a job. 
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WORK MANAGEMENT OVERVIEW 


System 


3. 






Subsystem Ne Job 
Description Description 


Work 
Entries 






ods Subsystem 















Routing 
Entries 


t, A job executes under the control of a subsystem. 


2, A-subsystem provides a controlled environment for the execution 
of jobs. 


3, The subsystem description defines what jobs can execute within 
the subsystem and how they can execute. 


He Each job must have a job description. The work entries identify 
the job description that has a set of attributes for the job such as 
the library list, routing data, and user profile. 


5. Routing entries specify the class, which defines the execution 
priority for the job. 


Gali ae, pararean fore 
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Progress Check — Unit 1: Work Management 


stasttd weed CPF. 
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Read each question carefully. Record your answers in the space 
provided. 


1. Where is work performed in the System/38? 





2. Whatisa storage pool? ?¢” Subsystem olWWaon tion 
(he ALLOYS (BA ; 


QA’ sOGL ae, 


4 Lo" Ahh 


J 





3. List and describe the functions of the 5 system-supplied 


subsystem. 
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4. Describe the 3 steps required to IMPL and start CPF. 
ly | ) a 1/0 AL 
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5. Code the command to perform a controlled power down of 
the system with no time limit. 


wRD SYS 


When you are finished, return to the module and review your an- 
swers with those in the text. 
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INTERACTIVE JOB SUMMARY ») 


Interactive Work Management 


JOBQ 





SBSD OINTER 

Job 
Description 

QINTER cs, 

=~ ae ses ‘ 
aes | Send Command 
QCMDI — _8 | Entry as 
~~ Re 2 Gl 


\ 


‘4 \ 
Class io 5! Pool 1 | 9 
QINTER | / \ 
\N- QCL / 
Profile / 
Ye 
QSECOFR | _ 
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EB Sign-on at a work station. 


EN The subsystem description must have an entry to support 
that work station. 


The work station entry points to a job description which in 
turn points back to a routing entry in subsystem description. 


23 G3 GT The routing entry points to a class, storage pool, and the 
name of the processing program for the routing step. 


The processing program is QCL which checks the user pro- 
file for an initial program. 


In this example, when the security officer signs on, the com- _ 
mand entry screen is displayed. 
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Cc Machine Exercise — Unit 2: Interactive Job Processing 





The purpose of this exercise is to show you how to: 
e Create and use an output queue. 


¢ Display and change your interactive job. 


Read through the entire exercise before you go to the work sta- 
tion so you know in advance what you are expected to do. Make 
any notes, if you wish, to aid you when you are doing the 
exercise. 


Note: Substitute your initials for xxx in the instructions. 


1. 


Sign on your work station with the course password, 
S38IMPL. 


. When the System/38 Implementation Topics Course Menu 


appears, select option 1 and enter your initials. This option 
creates your library and any source files you may need. 


. When the Programmer Menu appears, create an output 


queue named OUTQxxx in your library ITLIBxxx. Allow 
other users to display any file in your output queue. 


. Enter the CL command to display your interactive job. 


. Select option 3 from the Display Job Menu to display your 


job definition. The Job Definition Attributes display appears. 
Note your output queue name. It should be GLCOUTQ. 


. Press CF 1 to return to the Programmer Menu. 


. Enter the CHGJOB command to change your interactive job 


to use your output queue, OUTQxxx, in your library. 


. Repeat Steps 4 and 5. 


Again, note your output queue name. It should now be 
OUTQxxx in your library. If it isn’t, repeat Step 7. 


React chayp CEA ON sei nana dst ilar aa 38 
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10. 


11. 


12. 


13. 


14. 


15. 


16. 


17. 


. Press the Enter key to return to the Display Job Menu. 


You may now select any or all options to review your job 
attributes. When finished, press CF 1 to return to the Pro- 
grammer Menu. 


Select the option from the Programmer Menu to edit a Con- 
trol Language program named STARTxxx. The source mem- 
ber already exists in the QCLSRC source file in your library. 


Review the source program. When finished, press CF 1 to 
exit SEU. You do not need to type or change any entries for 
the source program. 


When the SEU EXIT menu appears, enter a ‘Y’ in the ‘’Print 
source listing’ field. Press the Enter key. 


Enter the DSPOUTQ command to display your output queue. 


You can identify your file by your job name. 

Select option 1 on the Output Queue display to list your 
spooled file. 

You can further identify your source listing by the member 
name, STARTXxx. 


Press the Enter key to return to the Output Queue display. 


On the Output Queue display, select option 3 for your file. 


J 





18. 


19. 


20. 


21. 


22. 


23. 


Locate the OUTQ parameter on the Change Spooled File 
Attributes Prompt. Change the value to GLCOUTQ. Next, 
change the library name for the OUTQ parameter to *LIBL. 
GLCOUTQ is in the QGPL library and this name is in the user 
library list. Then press the Enter key. 


Press CMD 5 to redisplay when the Output Queue display 
appears. You should find that your file has been removed 
from your queue. 


Press CF 1 to return to the Programmer Menu. 
Press CF 1 to return to the Course Menu. 


Select option 90 to sign off. You have now completed the 
steps for this exercise. 


Remove your program listing from the work station printer. 


When you are ready, return to your module text and begin 
with Unit 3 — Batch Job Processing. 
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JOBD 


_ 
bees 


BATCH JOB SUMMARY 


JOBQ 





Storage Pool 









Job 
Message 
Queue 





The following steps occur in starting a batch job: 


5 8 


EB 


The subsystem description must have a job queue entry that 
points to a job queue. The job is selected from the job 
queue that has the name of the... 


Job description which contains routing data that is used to 
selecta... 


Routing entry in the subsystem description. The routing en- 
try points toa... 


Class, ... 
Storage pool, ... 


and the processing program for the routing step. The pro- 
cessing program is QCL which checks the... 


Job message queue for commands to execute. 


Cc Machine Exercise — Unit 3: Batch Job Processing 


The purpose of this exercise is for you to: 
¢« Use an output queue. 


¢ Display and change your batch job. 





¢ Create a job description. 
¢ Submit a job to the batch subsystem. 
e« Run a job stream. 


Read through the entire exercise before you go to the work sta- 
tion so you know in advance what you are expected to do. Make 
any notes, if you wish, to aid you when you are doing the 
exercise. 


Note: Substitute your initials for xxx in the instructions. 


1. Sign on to your work station with the course password, 
S38IMPL. 


2. When the System/38 Implementation Topics Course Menu 
appears, select option 2 and enter your initials to display the 
Programmer Menu. Your library and files should still exist 
wy from the previous machine exercise. 


3. Create a job description named JOBDxxx and store it in 
your library. Your job description will have the following 
parameters: 


INLLIBL = (ITLIBxxx GLCITLIB QGPL QIDU QTEMP) 


OUTQ = OUTOXxx 


Take the default values for the other parameters. 


Module 3. Work Management 99 


100 ZR30-1020 


10. 


11. 


12. 


13. 


14. 


Enter the command to display your job description. Verify 
that it was created in your library with the requirements 
stated in the previous step. 


Press the Enter key once to see Routing and Request data 
values. Press the Enter key again to see the library list. Ver- 
ify that it is correct. 


. Press the Enter key to return to the Programmer Menu. 


. Change the job description (Jobd:) value on your Program- 


mer Menu to one you just created, JOBDxxx. 


. Use option 3 of the Programmer Menu to create a control 


language program named LIBLIST. The LIBLIST source pro- 
gram already exists in the QCLSRC file in your library, 
ITLIBxxx. 


. Display your output queue, OUTOQxxx. Your compiled pro- 


gram listing should be in this output queue as a result of us- 
ing your job description. LIBLIST should appear under the 
Job Name heading. 


Select option 1 of the Output Queue display to view the pro- 
gram. This program replaces the library list and changes the 
job’s output queue. 


Press the Enter key to return to the Output Queue display. 


Select the option to cancel the program listing from your 
output queue. Press the Enter key. 


Press CF 1 to return to the Programmer Menu. 


Enter the command to create a printer device file named 
APCHECKS in your library. This file is to use output queue 
OUTQxxx. Take the default for the other parameters. 


Note: Program APR150, that you will run in a later step, 
uses APCHECKS as the device file for printed output. 


2) 


15. 


16. 


17. 


18. 


19. 


20. 


21. 


22. 


23. 


24. 


25. 


Enter the command to display the file description of your 
printer device file, APCHECKS. 


Press the ROLL 4 key twice to verify that your out- 
put queue name is correct, OUTOxxx. 


Press the Enter key to return to the Programmer Menu. 


Submit (SBMJOB command) a job named JOBxxx to the 
QBATCH subsystem from your work station with request 
data of ‘CALL APR150’. Include your job description, 
JOBDxxx, on the submit job command. Hold your job on 
the QBATCH job queue. 


Enter the command to display the QBATCH job queue. 


Select the option to release your job. Your job executes the 
APR150 program that produces accounts payable checks. 


Press the Enter key to return to the Programmer Menu. 


Enter the command to display your output queue. Locate the 
spool file, APCHECKS, resulting from your submit job 
request. 


Select option 1 to view your file. 
Press CF 1 to return to the Programmer Menu. 


Enter the command to clear your output queue. 
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26. Enter the command that starts a data base reader to read a 
job stream that already exists in the course library with the ~Y 
following parameters: 


— FILE: COPYFILE.GLCITLIB 
— MBR: COPYJOB 
— MSGa: *"REQUESTER 


The job prints the first eight records from the APPVEND 
data base file. 


The commands in the job stream are shown below. 


//JOB JOB(CPYJOB) OUTQ(GLCOUTQ) 
CPYF FROMFILE(APPVEND.GLCITLIB) TOFILE(*LIST) TORCD(8) 
/ /ENDJOB 


27. At the Programmer Menu, press CF 6 to display messages. 


28. Press CF 8 to remove your messages and to return to the 
Programmer Menu. 


29. Press CF 1 to return to the Course Menu. 


30. Select option 4 and enter your initials to remove your course 
materials. 


31. Select option 90 from the Course Menu to sign off the 
display station. 


32. Then, remove your listing from the Guided Learning Center 
printer and return to your study carrel. 


2s When you are ready, return to your module text and begin 
= with Unit 4 — Work Management Considerations. 
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C Module Exercise — Module 3: Work Management 


Read each question carefully. Record your answers in the space 
eel provided. 


1. Where are jobs processed on the System/38? 


| pbs ake pkocorhecl Lethe rt nT ea 


2. When option 6 on the programmer menu is used to submit a 
job, to what subsystem is it submitted? 


e 





Ahn pal 1a dahon He ft (ALLL 
CL hoe 
3. List two ways to start a batch job from the interactive 
subsystem. 
Qs ~Job SAY T 
SIR D DR) 


“Ses Lis CSTR CRD aa ) 
4. What is oui unction 6 88 a agen ae DB ROR 






ci jobs be placed in the job queue without the spool sub- 


5: 
system being active? 
f 
AA/ oa FAL AIA AA CES, 
ip y HA VS/AT OB Sh4 Dib See Sear sete 
ae are ge? Pare-res 1 reer ilal 
6. Does spool support as st 


. 3 When you are finished, return to the module and review 
IBM . ‘ 
| your answers with those in the text. 
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Module Summary 
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t fir Lwo 


A job is the basic unit of work on the System/38. Work Manage- 


ment allocates resources for use with jobs, manages jobs on the 
system, and schedules jobs for execution. The Control Program 
Facility provides all the functions necessary for a complete work- 
ing system. You can change these functions where desired 
through control language commands to meet your application 
requirements. 


A job executes under the control of a subsystem. A subsystem 
provides a controlled environment for the execution of jobs. 


System/38 provides five subsystems: 
¢ A controlling subsystem 

¢ An interactive subsystem 

« A batch subsystem 

¢ A spooling subsystem 

¢« A programmer subsystem 


In addition to the supplied subsystems, you can define your own 


subsystems. You can also use control language commands to tai- 


lor a subsystem to meet your needs. 


At this time, continue your course of study with the Introduction 
to Module 4, Control Language Programming, on the next page. 
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Cc Module 4. Control Language Programming 








CONTROL 
LANGUAGE 





In the previous System/38 Application Programming course you 
were introduced to Control Language (CL) programs. In this and 
the previous course you have entered CL commands individually. 
In this module you will learn how to create an executable pro- 
gram with a series of CL commands. Used this way, Control Lan- 
guage is a high level language, similar in many respects to 
languages like COBOL and PL/I. Also, in this module you will 
learn about the CL commands that can only be used in a CL 
program. 


Before starting your study of this module you need the following 
materials and reference manuals. Get any of this material you do 
» not have from your Guided Learning Center Administrator at this 
time. 


¢ Paper and pencil 
¢ The Module 4 text 
¢« The following reference manuals: 


1. IBM System/38 Control Language Reference Manual 
(SC21-7731) 


2. IBM System/38 Control Program Facility Programmer's 
Guide (SC2 1-7730) 


3. IBM System/38 Source Entry Utility Reference Manual 
(SC21-7722) 


Begin your study of Control Language programming in the Module 
[wm 4 4 text now. 
| 
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STUDENT NOTES: Module 4. Control Language Programming > 


As you proceed through the study module, use these pages to record any notes you feel will 
help you understand the topic. 
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STUDENT NOTES (continued): Control Language Programming J 
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STUDENT NOTES (continued): Control Language Programming 
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Progress Check — Unit 1: Using CL Programs > 


Read each question carefully. Record your answers in the space 
oe provided. 


Which of the listed program languages can you use to do the 
following? 


a. CL 
b. Other System/38 Languages 
c. Any of the above. 

1. Create a file. 


2. Read a data file. 


3. Update a data file record. 


5. Use display subfiles. 


Qa 

ss 2, 

a5. 

_C 4. Read and write a display file. 
bo 

Oo. 6. Override print file attributes. 2 
7 


7. Print data using a printer file. 


When you are finished, return to the module and review your an- 
swers with those in the text. 
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Nevertheless, except for the limitations mentioned above, the CL 
programming language is a full function language. For instance, 
the CL programming language has the following in common with 
the other System/38 languages; 


¢« Decision logic such as IF and GOTO statements 
¢ Arithmetical capability of add, subtract, multiply and divide 
¢ Definition capability for variables 


¢ Input-output capability to write and read a display file, and to 
read a single-format data base file sequentially. 


¢« Usable in both batch and interactive jobs 


¢ Inter-program communication capabilities to pass control and 
data between programs. 


When programming an application, you use a CL program to cre- 
ate and delete objects such as files, data areas and libraries. 
Also, you use a CL program to check for the existence of 
objects. 


You use a CL program to control job and file attributes in an 
application. 


You may elect to use a CL program as the main controlling pro- 
gram of an application. Because of the unique functional capabili- 
ties of CL commands, CL programs lend themselves to this use. 
In an interactive application this main program controls the main 
menu display file and calls other programs. 


As you go through this module you will study many CL programs 
which illustrate their typical uses. 


On the other hand, if you need to update a file, print reports, use 
a communication file or process a display subfile, you must use 
the other System/38 languages. 


Cc Progress Check — Unit 2: Coding CL Programs 


Read each question carefully. Record your answers in the space 
eee provided. 


Indicate whether each of the following is true (T) or false (F). 


I" 4. Of you start to code the parameters of a command position- 
ally, you must code any following parameters positionally. 


= ae 2. One or more blanks are required between Hy ‘ga and a 
command. she b eee NK, i ional pecarroe a 
colo not a blank olalimits a Balad nar » 


_T_ 3. ##STMT103 is a valid od name. A fabel mame nut 


Login wak A-Z,$ iF or @, urtuk can he joccine by + 


a 4. Parameters are separated by one or more blanks. 


aa 5. You cannot code a comment between a command and a 
parameter. 


When you are finished, return to the module and review your an- 
swers with those in the text. 





he CL Corman as Amk ina Ch f ray kas this 
pure svtutks ate Athan Lin che mane AVAL + 


ho | Command - name fava meter's 


iii. YG 4 antl tn as f? 
f Paheh ae Cerin Por V, 


Sale. dee ae, Oe 
Sea monet ‘ane ew Characters Wor cam 2 ee 
pe ers Samd pees Pre 
Sud ReU F 


comunudyr rare au coynaniama at (rbs obpeck ak abject 


ALU LD 
Many turns an o Tia tA 


Co cnasysval 
chery Byte 


Module 4. Control Language Programming 111 


Machine Exercise — Unit 3: Coding a CL Program for a Menu Display 


Read through the entire exercise before you go to the work sta- 
tion so you know in advance what you are expected to do. Make 
any notes, if you wish, to aid you when you are doing the 
exercise. 





Substitute your initials for xxx in the instructions. 


In this exercise, you are asked to code, compile, and execute a 
CL program to control the following menu. 





The display file for the menu and the programs you will call from 
your program are in the library GLCITLIB. This library name has 
been put in all the required library lists for you. As a result, you 
do not need to qualify any file or program name in your program. 
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The DDS for this file, which you will need to reference for your 
coding, is shown below. 


DATA DESCRIPTION SPECIFICATIONS 
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"No. of sheets per pad may vary slightly. 


1. Code your program following the instructions below. 

a. Name your program APCL3xxx, where xxx are your 

initials. 

b. Use the IF and ELSE logic commands to determine the 

option entered. 

c. Code your program to call the program name shown in 
parenthesis on the menu when its option is entered. 
Exit the program with a RETURN command. 

e. Code your program on paper or in the Notes section for 

Module 4, here in your Student Materials Book. 

f. Use the appropriate material as the need arises. 


a 


2. When you have finished coding and checking your program, 
go to a display station attached to a System/38 and enter the 
password S38IMPL to sign on. 
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3. From the System/38 Implementation Topics Course Menu, 


select option 1 to create a library. Be sure to enter your 
initials. 


When this operation is complete, the Programmer Menu 
appears on the display. A sample Programmer Menu appears 
below. 


Select option 8, Edit source, to use SEU to enter your 
program into a source member. The Type is CLP for CL 
program. You may want to have the IBM System/38 Source 
Entry Utility reference manual and User’s Guide (SC21-7722) 
available. It is located in the Guided Learning Center 
Resource Library. 


Enter your source statements. 


When entering command statements you will find it very 
helpful to enter the command and then press CF 4. This will 
not only prompt for the parameter values but supply the pa- 
rameter keywords and align your command statements. You 
can even use CF 4 within the prompt. For instance, when 
you code a command in the THEN parameter of an IF com- 
mand, you can enter CF 4 and get the prompt display for 
the command you just entered. 


Use CF 1 to end SEU. 


When you have finished entering your program, compile it 
by entering option 3 from the Programmer Menu. 


JY 





. When you have gotten a successful compile, run your 


program from the Programmer Menu with option 4. 


The Accounts Payable Check Processing menu should 
appear on the display. 


. If the Accounts Payable Check Processing menu appears on 


the display, continue with Step 9. 


If the Accounts Payable Check Processing menu does not 
appear, review your program, make any corrections, and be- 
gin again with Step 4. 


Test your program by entering the options 1, 2, 3, and 4. 
When you enter a correct option, the program called issues 
a message informing you that the call was successful. Fol- 
low the instructions of the message to return to the Ac- 
counts Payable Check Processing menu. 


. After you have tested each option, select option 90 to re- 


turn to the Programmer Menu. 
If your program processed propertly, continue with Step 11. 


If your program did not run correctly, determine the error, 
and begin with Step 4 again. 


. With the Programmer Menu displayed, press CF 6 to display 


your messages. Each of the messages you saw earlier 
should appear on the display. 


. Press CF 8 to return to the Programmer Menu. This deletes 


all the messages you saw. 


. Press CF 1 to return to the Course Menu. 


. Select option 90 from the Course Menu to sign off the 


display. 


Your Administrator has a copy of a possible solution for the CL 
program. You may get a copy if you feel you need it and it will 
be of help to you. 


When you are finished with the exercise, return to Unit 4 of 


the Module 4 text. 
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Progress Check — Unit 4: Communicating Between Programs ) 


Read each question carefully. Record your answers in the space 
provided. 


Indicate whether each of the following statements is true (T) or 
false (F). 


1. You can pass data with a transfer control (TFRCTL) 
command. 


2. You can code a variable for the program name in a CALL 
command. 


3. You can code a variable for the program name in a TFRCTL 
command. 


. The PGM command in the calling program lists the parame- 
ters to be passed. 


5. You can code a constant as a parameter in a TFRCTL 
command. 


6. Decimal constants are always passed with length attribute of 
(15 5). 


7. Character constants are always passed with a length of 32 


bytes. > 
8. The following coding example passes data correctly. 


PGM PARM(&A &B &C) 

DCL VAR(&A) TYPE(*DEC) LEN(8 2) 
DCL VAR(&B) TYPE(*CHAR) LEN (10) 
DCL VAR(&C) TYPE(*CHAR) LEN(20) 
DCL VAR(&D) TYPE(*DEC) LEN(5) 


TFRCTL PGM(APVND) PARM(&A &D) 
ENDPGM 


ee a 9. The program at the bottom of the invocation stack is the 
program that is executing or has control in a job. 


_f-_ 10. The calling program can address the data in the parameter 
passing storage area. 


When you are finished, return to the module and review your an- 
swers with those in the text. 
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Progress Check — Unit 5: Creating Objects with a CL Program 


Read each question carefully. Record your answers in the space 
provided. 


1. 


2. 


List the three types of data you can define with the DCL 


co and. 
isin wt, (* DEC) 


Daves err (A CHAR 
Logical [ *LGL) 


Write a CHGVAR command to multiply &A and &B and 
round the answer, &PROD, to the nearest cent. 


DCL VAR(&A) TYPE(*DEC) LEN(5 2) 
DCL VAR(&B) TYPE(*DEC) LEN(5 4) 
DCL VAR(&PROD) TYPE(*DEC) LEN(10 2) 


CH : 0 nruel hp FDR) + .005 





Given the following data values 


&A = 18.40 
&B = 14 
&D = 3.2 


what is the value of &ANS when the following CHGVAR 
command is executed? 


DCL VAR(&A) TYPE(*DEC) LEN(4 2) 
DCL VAR(&B) TYPE(*DEC) LEN (5) 

DCL VAR(&D) TYPE(*DEC) LEN(5 2) 
DCL VAR(&ANS) TYPE(*DEC) LEN(10 1) 


CHGVAR VAR(&ANS) VALUE(((&A * &B)/&D) + .05) 
S020 
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4. Given &X = 'l' 
&Y = 'l' 
&Z = 'OQ' 

is &INO1 true or false when the following command is 


executed? 


CHGVAR VAR(&INO1) VALUE(&X *AND &Y) *OR &2Z) 


Trae 


5. What is the contents of &A when the CHGVAR command is 
executed? &B contains 38429. 


DCL VAR(&A) TYPE(*CHAR) LEN (6) 
DCL VAR(&B) TYPE(*DEC) LEN(5 2) 


CHGVAR VAR(&A) VALUE (&B) 


BBY. AG 


When you are finished, return to the module and review your an- 
swers with those in the text. 
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C Machine Exercise — Unit 6: Substring Coding 


Read through the entire exercise before you go to the work sta- 
tion so you know in advance what you are expected to do. Make 
any notes, if you wish, to aid you when you are doing the 
exercise. 


Substitute your initials for xxx in the instructions. 


In this machine exercise you are to code, compile and execute a 
CL program. The program is to use the substring function to add 
the digits in the character string of numbers, ‘820953’. Name 
your program SSTCLxxx. 


1. Code your program observing the following items: 
a. Declare the character string as follows: 


DCL VAR(&NBR) TYPE(*CHAR) LEN(6) VALUE('820953') 
b. Declare the variable to contain the sum as follows: 


DCL VAR(&SUM) TYPE(*DEC) LEN(2) 


c. To display your answer, write your program to call pro- 
gram DSPANS with &SUM as the parameter. 


2. When you have finished coding and checking your program, 
go to a work station and enter the password S38IMPL to 
sign on. 


This displays the System/38 Implementation Topics Course 
Menu. 


3. Call the Programmer Menu by entering option 2. Remember 
to enter your initials. 
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4. 


Select option 8, Edit source, to use SEU to enter your pro- 
gram into a source member. 


When entering command statements you will find it very 
helpful to enter the command and then press CF 4. This will 
not only prompt for the parameter values but supply the pa- 
rameter keywords and align your command statements. You 
can even use CF 4 within the prompt. For instance, when 
you code a command in the THEN parameter of an IF com- 
mand, you can enter CF 4 and get the prompt display for 
the command you just entered. 


End SEU activity with CF 1. 


When you have finished entering your program, compile it 
by entering option 3 from the Programmer Menu. 


. When you have gotten a successful compile, execute your 


program by selecting option 4 from the Programmer Menu. 


A message displays your answer and the correct answer. 
Press the Enter key to end the display. 


lf your answer is incorrect, review and correct your code and 
begin again with Step 4. 


When your answer is the correct one and the Programmer 
Menu is displayed, press CF 6 to display your message(s). 


Press CF 8 to return to the Programmer Menu. 


. Press CF 1 to return to the Course Menu. 


. Select option 4 from the Course Menu to delete your mate- 


rial. Remember to enter your initials. 


. Select option 90 from the Course Menu to sign off the work 


station. 


Your Administrator has a copy of a possible solution for the CL 
program. You may get a copy if you feel you need it and it will 
be of help to you. 


When you have completed this machine exercise, return to the 
Module 4 text and continue your study in Unit 6 at the section 
titled ‘‘Character String Operators’ ’. 


J 


J 


Progress Check — Unit 6: Character String Operators 


Read each question carefully. Record your answers in the space 
provided. 


1. Indicate which character string operator best fits each of the 
following situation? 


*CAT 
* BCAT 
*TCAT 


# gcnT a. Obtain proper spacing for variables used in a mes- 
sage text. 


*7CHT b. Builda qualified name from variables in a program. 


CAT. Accept existing spacing of character strings. 


2. Is the text in the following MSG parameter correctly coded? 
If not, why is it incorrect? 


DCL VAR(&SUM) TYPE(*DEC) LEN(5 2) 


SNDBRKMSG MSG('Your answer is' *BCAT &SUM *CAT '.') 


Only he rectir Masaya ) Onn he weck 


(HAY Akar ptr ALDER AALY SIS 6 & LAE YL AK 


BUM Comtatits 4 g nek. 0 lata , ne ie U4 
the value ev v¥ Sue LO 04 hEe wal 
eee te Cltnrvoentl chYte Chane CABAL es pe bal & 


When you are finished, return to the module and review"your an- 
swers with those in the text. 


Lenrkt CH CHAVAR CeErntmarte , aa fasten 


CHGVAR VAR (¥ CSU } U NU (¢su er ) 
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Progress Check — Unit 7: Using Data Areas ZY 
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PPP PPP PPE 


Read each question carefully. Record your answers in the space 
provided. 


Indicate the letter of the item which matches the numbered 
statements. 


a. Retrieve data area command, RTVDTAARA 
b. Local data area 

c. Permanent data area 

d. Declare data area command, DCLDTAARA 


. Created by CPF. 

. Creates a CL variable using the data area name. 

. Created by the user. 

. Lasts for the duration of a job. 

. The data area need not exist to compile this command. 

. The data area must exist to compile this command. J 
. Command contains substring capability. 

. Can only contain character type data. 

. Can perform same function with CHGVAR command. 


. Code a command to create a data area named PRJTTL in 


the library named PRJLIB. The data area is to contain 30 
characters. Other users can have normal use of the data 
area. 


T a ge RVI 
TYPE (*CH 4 12) LEN(20 } Puig AUT (# WORHAL ) 


. Code a command to extract 10 characters starting at posi- 


tion 31 of the local data area. Put the data in the variable 
&ACCTCD. 


RtY DIiAARA DTAA KH {*L Dp bod jo) RINVAK[fHCCTCD) 


or 
CHGVAK VAR (fAccTco) ynue(%SsT (Hon 3) 0) ) 


When you are finished, return to the module and review your an- 
swers with those in the text. 


C Desk Coding Exercise — Unit 8: Using the % SUBSTRING Function 


In this desk exercise you are to recode the example in the 
student text in Unit 8 under the heading Using System Values 
assuming the system date is in julian format. 


Hint: use %SUBSTRING to extract the month and day from the 
converted date. You are encouraged to use reference material 
when the need arises. 


OC A Ie g LE 4 [+ CHB = 
DCL a) {ep TE” \ Ty¥PE [A CHA 2 7) 
Den va (for) “yee (FAGey 
f Ks mae? the ut uw Mifdrseyi ANAL "= 
f ( 


LAr feapate % KIMVARLPDATE 


Kt Convert: the dat format to Awy */ 


, 7} 


Vas 
=, 
tA 


When you are finished, return to the module and review 
your solution with the one in the text. 
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Progress Check — Unit 8: Getting System Values and Converting a Date Format » 


Read each question carefully. Record your answers in the space 
aT | provided. 


1. Assume a date entered from the console is to be used in a 
CL program to change the system value QDATE. QDATE is 
in the julian format. The date is entered in the format MM/ 
DD/YY into an 8 character field named &DATE. You are to 
code the following three commands: 


A DCL command to declare the variable &JULDT to 
contain the julian date. 


A CVTDAT command to convert the date entered to 
the julian format. 


A CHGSYSVAL command to change the system 
value to the date entered. 


Do not hesitate to use the ocrenes manuals. 
efecHuAr \ LEAS 


“(PDATE _\ tTovHRr(fIULDT 
“Ro ps K ITY “i T (ee TOSE £ NODE ) 


OtGe SYSVAI Sysv AL QDA riz } VALUE (%¥TuLDT ) 


Indicate whether each of the following statements is true (T) or J 
false (F). 


- 2. You can change all the system values. pene Lyre YValir24 
hike fhe ot-rnormal’ hone ne Leow GAB NORH Sud 

Aue Coyrbeeelecd aut cuw rly he per big CPF, ’ 
me ie 3. Time system values are stored as character tye data. 


non 
_f'_ 4. You can create new system values. 


When you are finished, return to the module and review your an- 
swers with those in the text. 
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Progress Check — Unit 8: Job Attributes 


Read each question carefully. Record your answers in the space 
Bats provided. 


Indicate whether each of the following statements is true (T) or 
false (F). 


Pd 


_t 1. Assume the job switches are set as follows 01010001. 
Control will be transfered to STMT 10. = 


TF COND (XLXXOXX0) THEN (GOTO STMT10) 


Tt 2. Every running job has as associated set of job attributes that 
can be accessed by the user. 


he. 3. You can retrieve more than one job attribute with one 
RTVJOBA command. 


Se, ott hrAZ£4 
Yo a pacity pera ‘iiaieaena 
RTVIOBA Commanctk 


When you are finished, return to the module and review your an- 
swers with those in the text. 
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Module 4 Summary — Control Language Programming 
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Most applications you will develop or maintain will probably have 
one or more CL programs. You have learned a great deal about 
control language programming in this module. Following is a sum- 
mary of the highlights of what you studied. 


The use of CL programs in applications. 
The syntax of coding of CL commands in CL programs. 


How to write a CL program to control a menu display, and 
how you use IF and ELSE commands for logic. 


The coding of the CHGVAR command to manipulate character, 
decimal and logical values. 


How communication is established between programs and the 
use of the CALL and TFRCTL commands to pass control and 
data between programs. 


How to use the create commands with the monitor message 
command to create an object in a CL program. 


The use of the built-in functions and character string operators. 


The creation and accessing with allocating of data areas in CL 
programs. 


How to retrieve system values and obtain job status in a CL 
program. 


This completes your study of Control Language Programming. 
Continue with the next module, Source Entry Utility Additional 
Topics, by reading its Introduction on the next page. 


J 


C Module 5. Source Entry Utility Additional Topics 





Source Entry Utility (SEU) is one of the programs provided by the 
System/38 Interactive Data Base Utilities (IDU). SEU performs 
many functions with your source members, including: 


e Add new records 

e Change existing records 

« Move records 

e Copy records 

¢ Delete records 

e Scan records 

e Substitute characters in records 

¢ Copy records from one member to another 

¢ Provide formats for high level language specification types 
¢« Provide prompting assistance for record entry 
¢ Syntax checking 


The process of using SEU to enter and update records is called 
editing. SEU can be initiated by using option 8 of the Programmer 
Menu or by using the Edit Source (EDTSRC) command. 


SEU makes extensive use of Help text, command function (CF) 
keys, and function control keys. A summary of command func- 
tion keys and function control keys is on the following pages, as 
well as in the Source Entry Utility Reference Manual. 


You will use the following material for study of this module: 
¢ Module 5 text 


¢ IBM System/38 Source Entry Utility Reference Manual and 
User’s Guide (SC21-7722) 


Use the SEU Reference Manual to assist you with any of the ma- 
chine exercises in the module. 


Begin your study of SEU in the Module 5 text now. 
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Command Function Key Summary 
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Command 
Function Name 
Key of Key Description 
Previous Presents a logically prior display (not 
display valid on some displays) 
Invokes CL or BASIC prompting or 
display 
Services Displays the Services display 
Display 
C Cancel Cancels an operation for which you 
Pending have not entered all the line 
Operation commands 
Searches for the previous occur- 
Substitute | rence of a scan string and does a 
Backward substitution if one is specified 


CF 1 Exit Displays the Exit display to end SEU 
activity 
creates a prompting section on the 
CF 7 Scan/ Searches for the next occurrence of 
Substitute | a scan string and does a substitu- 
Forward tion if one is specified 
CF 12 Uppercase/ | Reverses status of uppercase/lower- 
Lowercase | case indicator 











c 


Function Control Key Summary 


Name of Key 
DEL Deletes the character in the cursor position 
and shifts all characters to the right of the 
cursor one position to the left 
DUP Duplicates a field from the previous record 
into the same field of the current record 
ENTER/REC ADV | Enters information you have keyed 


HELP Displays SEU help text; if cursor is on the 
message line, the second level text for that 
message is displayed 


HOME Press once to move cursor to its original 
position on the screen; press twice to re- 
move any keyed data that has not been 
entered 


Insert character(s); any keying causes exist- 
ing data to move to the right 


PRINT Prints the current screen display 


ROLL + Page forward through the displayed mem- 
ber; if cursor is on the message line, the 
next message displays 

ROLL } Page back through the displayed member; 
if the cursor is on the message line, the 
previous message displays 
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STUDENT NOTES: Module 5. Source Entry Utility Additional Topics 


As you proceed through the study module, use these pages to record any notes you feel will 
help you understand the topic. 


oe OAVIIAN ) 
5. =I A, “a g NY she YA Cnty “Tl tthe Ls £. Bh : O) yy 
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Cc STUDENT NOTES (continued): Source Entry Utility Additional Topics 
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Machine Exercise 1 — Unit 2: Using the Operations of the Service Display 


In this exercise you will use the Browse/Copy operation to copy 
source code from an existing source member into your source 
member. Then, you will use the Scan/Substitute operation to 
make changes in your source code. 





Read through the entire exercise before you go to the display 
station so you Know in advance what you are expected to do. 
Make any notes, if you wish, to aid you when you are doing the 
exercise. Substitute your initials for xxx. 


1. Sign on your work station with the course password 
S38IMPL. 


2. Create a library by selecting option 1 and entering your ini- 
tials on the System/38 Implementation Topics Course Menu. 


3. When the Programmer Menu appears select the Edit Source 
by entering option 8, program name MENUxxx and type 
CLP. MENUxxx is a new source member you are creating in 
your library. 


4. When your empty source member is displayed, press CF 5 
to get the Services display, similar to the one shown below. 
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5. Use the Browse/Copy operation to access the member 
APMENU 1. It is in the file GLCITSRC in the GLCITLIB library. 
The completed Services display is shown below. Make your 
entries, then press the Enter key. 


SEU EDIT SERVICES 


Scan/substi tute (CF7-Forward CF@-Backwaerd) 
Scan string? Sn hs ee 
Substitute ‘ntriiings) Lol ee ee 
From/to seanbrt nn tO 229999 StartZend position? O01 OfO 
Scan/substitute all CY Nt WN ~Compress/expand (Y N)? Y 
Ignore upper/lower case ‘(Y N)% WN rye Sear 

Scen on date i et arpee 
Date’ 86204723 Compare (LT GT EQ)? __ Reset all (Y N)% WN 


Browse/copy member Y 
Member: @AEEMENUI OO Files GLULTShe... Library? f 
Browse spooled Y N N i 
Fite’ QSYSPRT__.__ Job: MENUMBH .. Users SZBIMEL._. Jobnbr? 


Tisplay output queue CY N)I WN ’ 
Outa3 QERINT...._. ~—Library! #LIBL__ 
Screen separator Line ‘(4 to 21)% 14 


Syntex checking : 
When added/modif ied CY NOt Y¥ 
From/to seanbr $ aa et OQ 8 OO 
Modify source type? 





6. When the Edit display returns, your source member 
MENUxxx is at the top. APMENU1 is at the bottom. The 
cursor IS positioned at the first line of the browse member, 
APMENU1. 


Move the cursor on the split display to the first position of 
the line on the top half of the display which contains 
****BEGINNING OF DATA**** 


Enter the line command A. The copied source code will be 
placed on the following line. 
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7. Move the cursor to the lower half of the display and enter 
CC in the first two positions of the sequence number - 
0001.00 as shown below. This line command designates 
the first of a series of records to be copied. Your entries 
should be as shown on the following display illustration. 





8. Press the Roll ( key to get to statement 0025.00, the last 
statement of the source code. 


Note: The half of the display that is rolled is the one contain- 
Ing the cursor. 


9. Enter CC in the first two positions of sequence number 
0025.00. This designates the last record in the browse 
member to be copied. 


10. Press the Enter key to execute the copy. 
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You should now see the copied records in your source member 
which is in the upper half of the display. 


Note the code you have just added has been syntax checked as 
it was copied into your source member. Do not correct the state- 
ments in error. You will correct them in the next exercise when 
you use the Browse spooled file operation. 


You could have turned off syntax checking by entering an N for 
the Syntax Checking operation on the Services display. 


HEKKHEEHEHHEHEHKHKEKHHREHHEHHEHRHHEHHEE 


Next, you will use the Scan/Substitute operation to make two 
changes to your source code. First, remove or change library 
qualifications. Second, change the called program names from 
APCLO1, APCLO2, APCLO3, and so on, to PRCBO1, PRCBO2, 
PRCBO3, and so on. 


SKS HEHHEHHHEHHREHRE HEE 


11. Press CF 5 to return to the Services display. 
12. Set Browse/Copy to N. 


13. Set Syntax Checking to N to prevent further checking. (Lines 
already found in error are still highlighted.) 


14. Move the cursor up to the Scan/Substitute section. Enter the 
scan characters .APLIB, and, because you are removing 
characters, enter double apostrophes (°’) for the substitute 
characters. This tells SEU to substitute nothing once the 
scan characters are deleted. Press the Enter key when you 
have made these entries. 


15. When your source member appears, move the cursor to the 
first position of the first record. To do this you may have to 
roll the displayed pages down. Scan starts at the cursor po- 
sition in the page of records that is displayed. 


Press CF 7 to do a forward scan. 
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Because you left the default N for the ‘‘Perform all scan substitu- 
tions’’, the operation stops at each occurrence of .APLIB. 


When the character string for which you are scanning is found, 
you have the choices summarized in the table shown below. 


16. 


17. 


18. 


19. 


Press Substitute Continue Scan 


Enter yes no 

CF 1 no no (1) 

CF 5 yes no (2) 

CF 6 no no 

CF 7 yes forward 
CF 8 yes backward 


(1) Goes to the SEU Exit display. 
(2) Returns to the Services display. 


Press CF 7. 


Note the message that appears at the bottom of the display. 


Also note that .APLIB is removed. At each substitution oc- 
currence, press CF 7 until the message at the bottom of the 
display indicates the end of the member is reached. .APLIB 
occurs three times in the program. 


Press CF 5 to again get the Services display. 


Using Scan/Substitute, change APTEST to PRLIB. This time 
change “‘Perform all scan/substitutions’”’ to Y. Press the En- 
ter key. 


When your source member appears, position the cursor at 
the first position of the first line and press CF 7. 


Verify that APTEST is changed. It occurs three times in the 
program. Notice that SEU took into account the fact that 
PRLIB is shorter than APTEST, removed any resulting 
spaces, and shifted characters to left as needed. Had the 
substitution characters been longer, SEU would have ex- 
panded the field as necessary. 


2 


[AE RELEEL ELLE LEE TEL EEL ER 


Now you are to change the alphabetic part of the program names 
from APCL to PRCB. 


20. 


21. 


22. 


23. 


24. 


25. 


26. 


CARRERAS LLLZEEL ELISE LEE ELLE LES 


Press CF 5 to get the Services display. 


In the Scan/Substitute section: 

¢ Enter APCL on the Scan line. 

¢ Enter PRCB on the Substitute line. 

¢ Set ‘‘Perform all scan/substitutions” to Y. 


Press the Enter key. 


When your source member appears, position the cursor at 
the first position of the first record and press CF 7. 


Check the message at the bottom of the display to see if the 
substitutions were made. Ten substitutions should have been 
made in your source member. 


Press CF 1 to get the SEU Exit display. 


Select option 2 on the Exit display and, if you wish, enter a 
Y to print your source member. Press the Enter key. 


When the Programmer Menu appears on the display, press 
CF 1 to return to the Course Menu. 


Sign off by selecting option 90 of the Course Menu. 


Get your listing from the printer. 
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In the machine exercise you used the Browse/Copy operation to 
copy all of a source member into your source member. Similarly, 
by positioning the line commands A and CC, you can insert a 


portion of an existing source member anywhere in your program. 


With Browse/Copy, you can even browse the original version of 
the member you are currently editing. For example, you may 
have made some changes and need to refer to the original code, 
or you may have accidentally deleted a statement or group of 
statements. Browse/Copy allows you to access the original 
source member and use it just like any other browse member. 


You used the Scan/Substitute operation in the machine exercise 
to help you modify a relatively short program. You can readily 
see that this operation becomes more productive as the pro- 
grams you need to modify become longer and more complex. If 
you had to read each line of code in a program to make a 
change, the possibility exists one entry might be missed. Scan/ 
Substitute insures all changes are made as you specify. 


Return to the Module 5 text and continue your study at the sec- 
tion titled ‘‘Using the Browse Spooled File Operation.*’ 


J 


c 





Machine Exercise 2 — Unit 2: Using the Browse Spooled File Operation 


The purpose of this exercise is to familiarize you with the Browse 
spooled file operation of the Services display. You will see how 
you can use this operation to interactively correct errors found by 
a compile job. 


Read through the entire exercise before you go to the work sta- 
tion so you know in advance what you are expected to do. Make 
any notes, if you wish, to aid you when you are doing the exer- 
cise. Substitute your initials for xxx. 


1. 


Sign on to your work station with the course password 
S38IMPL. 


. Select option 2 of the System/38 Implementation Topics 


Course Menu to display the Programmer Menu. Your per- 
sonal library should still be available from the first exercise. 


. Change the Jobd field value on the Programmer Menu to 


GLCSEUJOBD. 


. Use the Create Object option (option 3) of the Programmer 


Menu to compile your MENUxxx program (type CLP). 


. When the Message Waiting light on your work station 


comes on (and the work station alarm may sound), press CF 
6 to display the message. 


The message should indicate your compile job ended abnor- 
mally. You did not get a successful compile. 


Press CF 8 to return to the Programmer Menu. 


. You will now use the Browse spooled file operation to cor- 


rect your program. Select option 8, Edit source, from the 
Programmer Menu to correct your source member, 
MENUxxx. 


Module 5. Source Entry Utility Additional Topics 139 


140 ZR30-1020 


8. When the SEU Edit display with your program appears, 
press CF 5 to get the Services display. 


9. Select the Browse spooled file operation by entering a Y in 
that section. An example of the completed display is shown 


below. 


SEU EDIT SERVICES 


Scan/substitute (CF 7-Forward CF8—Backward) 
Scan string? 
Substitute string? 
From/to seqnbr ! mma tO 2999599 Start/end position? Q01 OBO 
Scan/substitute all CY N)t WN Compress/expand (Y¥Y N)t Y 
Ignore upper/lower case ‘(Y N)$ W 

Scan on date 
Tate? @4404223 Compare (LT GT EQ@>t __ Reset all (Y NDt WN 


Browse/copy member CY N)% W 
Member? MENLUMBH..__ Filet Q@CLSBC._.. Library! JILIBMBH_ 
Browse spooled file CY ND Sp lnbrt 
File? QSYSERT____ Job MENUMBH.__ User! S38IMEL.. Jobnbr3 


Tisplay output queue CY NDS 
Outta? GEBINI._... Library! 
Screen separator line (4 to 21)! 14 


Syntax checking 
When added/modif ied CY ND? ¥ 
From/to seanbr ? ee kok Se 
Modify source type! CLE __ 


Now press the Enter key. 


“LAST 





2 


10. When the split-edit display appears, the cursor is in the Pos: 
field of the browse member at the bottom half of the display. 


Move the cursor to the first position of the Scan: field of the 
browse member. Key an * in this first position, as shown 
below. 





All the compile generated error messages have an * in the first 
position of the message record. You are asking SEU to scan the 
browse member — the spooled output — looking for records with 
an * in the first position. 
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11. Press CF 7 to begin the scan. 


The scan stops at the first record with an * in the first posi- 
tion — the first error. Your display should be similar to the 
one below. 


% x * 
fears ae 
ed ee © Mh 


2aFs LS 





The cursor stops under the *. Note the error message on the 
display. The command ELES is not valid. It should be ELSE. 


12. Move the cursor to the Scan: field of the Edit member at 
the top of the display. 
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13. Key in a scan character string of ELES. You are asking SEU 
to find the statement in error in your program. See the ex- 
ample screen below. 
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ing of ELES — the scan charac- 


Inn 


the cursor at the beg 
ter string — as shown below. Key in the correct value — 


ELSE. 


15. The scan locates the error in statement 0005.00 and posi- 
tions 


14. Press CF 7 to start the scan operation. 
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16. Move the cursor back to the Browse member and position it 
at the * of the error line again. 


17. Press CF 7 to continue the scan for errors. 


18. The next error indicates an unbalanced parenthesis. The 
statement in error is number 23 (2300), the one immediately 
ahead of the error message line. 


Move the cursor up to the Edit member section and press 
the Roll 4+ key until statement 23 is on the screen. 


19. Position the cursor and add the missing parenthesis to cor- 
rect the line, as shown below. 


“Mbrt MENUMBH Scan? ELES : 
eee eee A are ae 2 eae e¢-e 3 ene eee a eee e¢e 5 eae eee & *e¢ eee 7 
is FGMC(PROBO9.PRLIB) >> 
ELSE CMDCIF COND(&OPTION = *10*%) THENC(CALL + 
PGMCPRCBLO) >) 
ELSE CMI RE TURN) 
Peo GOTO - CMDL. BL <SAASRT)? 
>” ENDPOM 
Hea eHMEND OF DAT Arta ae ae 


2 st "BROWSE Mor tSPOOLFILE Wti 


. ELSE CMUCRETURN 
i" “6PH0013 30 ahelenced parenthesis found 
= VRQ So GOTO - CMIILBL. (START) 
oe CPNO04L 30 ‘No. command parameter defined to receive value 
BACCO ENDEGM 
eat RS ee eat *# eee *® 6 END OF SOU R CE x** ee 
i | CROSS. REFERENCE | 
_ S71A881 ROS Moo BRPeso CONTROL LANGUAGE 


wih rs x* 
aia 





20. Looking at the Browse member, you can see the next error 
is at statement 24 (2400). It has a space between the 
CMDLBL and the parameter (START). 


Move the cursor to the invalid space on line 24 of the Edit 
member. Hold down the (Shift) key and press the DEL 
key to delete the space. 
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21. Move the cursor to the last * error line displayed in the 
Browse member (the one for statement 24) and press CF 7 » 


to see if you have any more errors. 


22. When you reach the end of the Browse member, press CF 5 
to get the Services display. 


23. The cursor is in the Browse spooled file section of the 
Services display. Move the cursor to the DSPOUTQ option 
and Enter a Y. Type SEUOUTOQO for the Outq parameter on 
the same line. See the display below. 
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Press the Enter key to get the Output Queue display. 


24. On the Output Queue display, be sure the cursor is on the 
line with your output. Enter a 9 and press the Enter key to 


cancel the spooled file. 


25. Press the Enter key to return to the Services display. 
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26. 


27. 


28. 


29. 


30. 


31. 


32. 


33. 


34. 


Press CF 1 to end the SEU Edit operation. 


When the SEU Exit display appears, be sure the Option is 2 
and press the Enter key. 


Select option 3, Create object, from the Programmer Menu 
to compile your program, MENUxxx. 


When the Message Light appears on your display station, 
press CF 6 to see the message. 


If the message indicates your job completed normally, your 
program compiled successfully, press CF 8 and continue 
with Step 31. 


If your job did not complete normally, press CF 8 and start 
again with Step 7, correcting the statements you find in 
error. 


Execute the command: DSPOUTQ SEUOQUTQ 


Position the cursor at the line with your output and type a 3. 
Press the Enter key to get the Change Spooled File 
Attributes display. 


On the Change Spooled File Attributes Prompt, position the 
cursor at the OUTQ parameter line and type GLCOUTO 
*LibL. Press the Enter key to return to the Output Queue 
display. 


Position the cursor at the Option Line for your Output Queue 


and type a 2. Press ENTER. 


The Spooled File Attributes display shows your compile 
listing has been moved to the GLCOUTOQ output queue in 
QGPL Library — an active queue — to print. 
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35. 


36. 


37. 


38. 


39. 


Press the Enter key twice to return to the Programmer 
Menu. 


Press CF 1 to return to the Course Menu. 


Select option 4 of the Course Menu and key your initials to 
remove your library. 


Position the cursor at the option field of the Course Menu 
and sign off with option 90. 


Remove your compile listing from the printer. 


Your Administrator has a listing of the successfully compiled pro- 
gram should you desire to check your program. 
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Return to the Module 5 text and continue your study of the Ser- 
vices display. 


J 


c 


Module Summary 


Source Entry Utility is a very versatile and useful tool to help you 
create and maintain your source members. You have used SEU in 
the System/38 Application Programming course and in Module 4 
of this course to primarily enter and correct high level language 
and CL program statements. You used SEU without really dwell- 
ing on SEU. This is an indication of how easily you can use the 
Interactive Data Base Utility, SEU. 


This module introduced some functions beyond the entry and 
correction of lines of code. The Services display and Exit display 
provide additional SEU operations you can use by simply keying 
options on a prompt display. In addition, Insert Skeleton provides 
an additional line command to make statement entry easier and 
faster. You can (and should) use any and all of these SEU capabil- 
ities aS you continue with this course and in your future System/38 
implementation efforts. 


This completes your study of Source Entry Utility Additional Top- 
ics. Continue with the next module, Message Handling, by read- 
ing its Introduction on the next page. 
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Module 6. Message Handling 













MESSAGE 
HANDLING 





Because the System/38 is in the hands of users, you need to 
know how its users communicate: 


¢« With the system, and 
e With each other 


You also need to be aware of how various system components 
communicate with each other. 


System/38 provides for this communication through the use of 
messages. A message is a communication sent from one point in 
the system to another. Messages are: 


¢« Entries you send to another system user 
¢ Entries you send to the system itself 


¢ Entries sent to you by other users or the system; these mes- 
sages could be in response to entries you have made at your 
work station 


¢ Entries sent to programs by other programs or the system 


System/38, through CPF, provides the facilities for message 
handling. In this study module, you learn how to send and receive 
messages as a user and in CL programs, how to monitor for 
messages in a CL program, and how to create and use your own 
messages. 


For your study of this module you will use: 
¢ The Module 6 text 
¢ These System/38 reference manuals: 


— System/38 Control Program Facility Programmer's Guide 
(SC21-7730) 

— System/38 Control Language Reference Manual (SC21- 
7731) 

— System/38 Operator’s Guide (SC21-7735) 

— System/38 Problem Determination Guide (SC21-7876) 


The next two pages in this book are provided for any notes you 
may wish to take as you learn about message handling on the 
System/38. Use them at your convenience. 


Begin your study of Message Handling in the Module 6 text now. 
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STUDENT NOTES: Module 6. Message Handling » 


As you proceed through the study module, use these pages to record any notes you feel will 
help you understand the topic. 
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C STUDENT NOTES (continued): Message Handling 
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Machine Exercise — Unit 1: Basic Message Handling Commands 


This machine exercise is intended to give you some practice us- 
ing some of the message handling commands you have just 
learned. 





Read through the entire exercise before you go to the work sta- 
tion so you know in advance what you are expected to do. Make 
any notes, if you wish, to aid you when you are doing the 
exercise. 


1. Sign on the display station using the password S38IMPL. 


2. From the System/38 Implementation Topics Course Menu, 
select the option to call the Command Entry Display. 


3. Determine the name of your display station's message 
queue. To do so, enter the CL command: DSPJOB and press 
the Enter key. 


A Display Job Menu, similar to the one below, appears. The 
work station message queue name is the same as the job 
name. Its location is shown on the example below. Note the 
name for your display station on the display. 





Write down the name of your display station: 
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10. 


Ws 


12. 


13. 


When you have noted the name of your work station's mes- 
sage queue, press CF 1 to return to the Command Entry 
Display. 


. Use the SNDMSG command to send an informational mes- 


sage to yourself at your work station. Use any message text 
you wish. 


Send a break message to yourself at your work station. Use 
SNDBRKMSG, make the message information only, and use 
any text you wish. 


. When your break message appears, press the Enter key to 


continue. 


. Display the messages in your work station's message queue. 


Both your messages should be on the display. After you 
have displayed and reviewed the messages in the message 
queue, press the Enter key to continue. 


Using the SNDMSG command, send an inquiry (*INO) mes- 
sage to yourself at your work station. Use whatever mes- 
Sage text you wish. 


Display the messages in your work station’s message queue. 


Notice your inquiry message appears twice in the queue. 
The first entry is the sender's copy. The second entry is the 
receivers copy, to which you must respond. Because you 
are both the sender and the receiver of this message, you 
see both copies. 


Enter a reply to the inquiry message and press the Enter 
key. 


Press the Enter key to return to the Command Entry Display. 


Module 6. Message Handling 155 


14. 


15. 


16. 


17. 


18. 


19. 


20. 


21. 
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Change the delivery mode of your work station’s message 
queue to break mode using the CHGMSGQ command. All 
your messages now automatically display. 


Press the Enter key to return to the Command Entry Display. 


Send an informational message to yourself at your work sta- 
tion. Use any message text you wish. 


Since your work station message queue should now be in 
break mode, your message appears immediately. If not, re- 
peat Steps 13 and 14. Note just the current message 
appears. 


Press the Enter key to return to the Command Entry Display. 


Again display the messages in your work station’s message 
queue. 


All the messages you have sent to yourself during this exer- 
cise should still be in the queue and appear on the display. 


Select any one message on the display. Delete that message 
by positioning the cursor on the line with the message and 
pressing CF 6. Notice the display reappears with the deleted 
message gone. 


Use CF 8 to delete all the messages in the work station 
message queue. The Command Entry Display appears on the 
screen. 


Sign off the work station using the SIGNOFF command. 


This completes the machine exercise for Unit 1. Return to your 
module text and continue your study with the topic “‘Additional 
Types of Message Queues.”’ 


J 


Progress Check — Unit 1: Basic Message Handling 


Read each question carefully. Record your answers in the space 
Aan provided. 


1. 


List and briefly describe four types of message queue deliv- 
ery modes. 


How can you change the delivery mode of a message 
queue? 


List and briefly describe four types of messages. 


Code the CL command to send the impromptu message 
‘System will be unavailable at 4:00’ to all work stations. 
This is an important message and should interrupt any 
processing. 
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0 ODD 


5. 


SNDMSG 
SNDMSG 
SNDMSG 


SNDMSG 


Which, if any, of the SNDMSG commands shown below is 
incorrect and why? 


MSG('Good Morning') TOMSGQO(WS02) 

MSG('Good Morning') TOMSGQ(*ALLWS) 
MSG('Good Morning') TOMSGQ(WS02 WS04) 
MSGTYPE (* INQ) 

MSG('Good Morning') TOMSGQ(WS0O2 WS04 USER1) 


Assume you have signed on to a work station and the Mes- 
sage Waiting light is on. Code the CL command to display 
the message queue of that work station. 


List three kinds of message queues. 


When you are finished, return to the module and review your an- 
swers with those in the text. 


J 
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Progress Check — Unit 2: Creating User Message Queues and Message Files 


Read each question carefully. Record your answers in the space 
provided. 


ie 


Code the command to create a user message queue named 
MYQUE. Store this queue in the library named MYLIB. Mes- 
sages sent to it should be identified with the sender's job 
name. 


List three characteristics of a message queue that are estab- 
lished when it is created. 


For the message queue created in Question 1, code the 
command to change the delivery mode to default and the se- 
verity level to 30. 


Code the command to delete the message queue created in 
Question 1. 


Where are all predefined messages stored on the System/38? 


How do you place messages in a message file? 
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7. List and briefly describe two control language commands 
you might use to maintain your own predefined messages. 2 


8. What is the purpose of the CRTMSGF command? 


When you are finished, return to the module and review your an- 
swers with those in the text. 
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C Progress Check — Unit 3: Message Handling with CL Programs 


Read each question carefully. Record your answers in the space 
FT | provided. 


1. List three message types, other than informational, you can 
specify in a CL program. 


2. List the two parts of a job message queue. 


3. Code the SNDPGMMSG command to send a predefined 
message with an identification of USROOO1 to a message 
queue named QUExxx in a library named ITLIBxxx. The pre- 
defined message is in a message file named MSGSxxx, 
stored in the ITLIBxxx library. Substitute your initials for xxx. 


4. Code the SNDUSRMSG command to send the message ‘Do 
you want to update the Master File? Enter Y for Yes, N for 
No.’ The message type should be inquiry (*INQ). Check to be 
sure that only Y or N are entered as a valid reply. Name the 
CL variable to receive the reply &RPLY. 


What additional command would have to be in the CL pro- 
gram in order for this SNDUSRMSG command to execute 
properly? 
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5. What command would you code to receive a message in a 
CL program? 


What are two items you can specify with this command? 


6. Code the complete CL program to accomplish the following 
steps. 
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When the program is initiated at a work station, execute 
the command you coded in Question 4. 


Check to see if the reply is N (for No). If so, skip to the 
end of the program and send the predefined message 
USROOO2. This message is in the message file MSGSxxx 
in the library ITLIBxxx. The message should be sent to the 
QUExxx message queue, also in the library ITLIBxxx. Sub- 
stitute your initials for xxx. (Hint: Use the SNDPGMMSG 
command to send the message.) 


If the reply is not N, execute the command you coded in 
Question 3. 


Call the program named APO10, stored in the ITLIBxxx li- 
brary. Substitute your initials for xxx. 


When the program finishes, skip to the end of the pro- 
gram. (Hint: Be sure no message is sent, however.) 


When you are finished, return to the module and review your an- 
swers with those in the text. 


c 


Machine Exercise — Unit 3: Message Handling with CL Programs 


This machine exercise is intended to give you some practice us- 
ing some of the message handling commands you have been 
studying. You will use message handling commands discussed in 
both Unit 2 and Unit 3. 


Read through the entire exercise before you go to the work sta- 
tion so you know in advance what you are expected to do. Make 
any notes, if you wish, to aid you when you are doing the exer- 
cise. Substitute your initials each time you see xxx in any of the 
exercise steps. 


1. 


Sign on to the work station using the password S38IMPL. 


. Select the option from the System/38 Implementation Topics 


Course Menu to create a library. Do not forget to enter your 
initials. 


Note: As a result of choosing the create library option, the 
Programmer Menu appears on the screen. You may use this 
menu or switch to the Command Entry Display to enter the 
commands for this exercise. The choice is yours. (Since you 
are primarily entering commands, the Command Entry Dis- 
play would probably be easier to use.) Remember, to get to 
the Command Entry Display from the Programmer Menu, use 
CF 3. To get back to the Programmer menu, use CF 1. 


. Create a user message queue using CRTMSGQ. The name of 


the queue should be QUExxx in the library ITLIBxxx. Identify 
message senders by their job name. 


. Create a user message file named MSGSxxx in the library 


ITLIBxxx with CRTMSGEF. 


. Add two messages to the MSGSxxx message file in IT- 


LIBxxx using the ADDMSGD command. Use the following for 
message id and text: 


MSGID MSG 
USROOO1 ‘Master file update beginning’ 
USROOO2 ‘Master file update skipped’ 
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10. 


11. 


Enter the CL program from Question 6 of the Progress 
Check. Name the program CLPxxx. (Hint: Use Option 8 of 
the Programmer Menu with CLPxxx as the first parameter 
and CLP as the Type entry.) 


Create an object for the CL program you just entered. Use 
Option 3 of the Programmer Menu to do this. Be sure the 
first parameter is CLPxxx and the Type entry is CLP. 


When the Message Waiting light appears on your work sta- 
tion, press CF 6 to display the message. 


¢ If your job completed normally, continue with Step 9. 


¢ If your job did not complete normally, use your program 


listing to determine the errors and start again with Step 6. 


Press CF 8. 


. Set your user message queue, QUExxx, to notify mode, us- 


ing the CHGMSGQ command. 


Execute your program, CLPxxx. Respond to the message by 
indicating Yes, you do want to update the master file. This 
message display is from the program’s external message 
queue. Notice the heading of the display — Program 
Messages. 


Note: If your program does not successfully execute for any 
reason (for example, you do not get the message asking if 
you want to update), determine your error and begin again 
with Step 6. 


When the message ‘“APO10 has executed”’ appears on the 
display, press the Enter key to return to the Command Entry 
Display or Programmer Menu, whichever you are using. 
Again, this message has come from the program's external 
message queue to the screen. 


J 


| IBM 


12. 


13. 


14. 


15. 


16. 


17. 


Run your program, CLPxxx, again. This time, respond to the 
message by indicating No, you do not want to update the 
master file. 


Run your program again, responding to the message with an 
invalid reply (something other than Y or N). Note what 
happens. 


Enter a valid response to continue. 


If you entered a Y for Step 13 to continue, press the Enter 
key when the message “‘‘APO10 has executed”’ appears on 
the display to get the Command Entry Display or 
Programmer Menu. 


If you entered an N for Step 13 to continue, the Command 
Entry Display or Programmer Menu appears automatically. 


Display your user message queue, QUExxx. Note the 
messages it contains. 


Remove all the messages from your user message queue 
with CF 8. 


Sign off the display station, If you have not already done so, 
collect your listing from the printer. 


When you have finished the exercise, you may review any 
part of the unit before continuing. When you are ready, 


return to the module text and begin the next unit — 
‘‘Message Handling.’ 
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Progress Check — Unit 4: Problem Determination and Message Handling 


Read each question carefully. Record your answers in the space 
ao provided. 


1. 


ZY 


List the three types of messages you can monitor for in a CL 
program. 


2. List and briefly describe the two levels of MONMSG com- 
mands you can use to monitor for messages. 


3. Assume the two CL commands below appear together ina. J 
CL program. Explain briefly what they are doing. 


CHKOBJ OBJ (APUPD.APLIB) OBJTYPE (*PGM) 
MONMSG MSGID(CPF9801) EXEC (GOTO NOPROG) 


4. List two System/38-generated logs you can use to aid you 


in problem determination. 
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5. Code the CL commands to accomplish the following: (Note: 
You are not coding a complete CL program, just some com- 
mands. You should, however, be able to incorporate them 
into a valid CL program.) 


¢ Declare two decimal variables, &P1 and &P2. Variable 
&P1 is passed via a CALL statement and is to be defined 
with a length of 15 positions and 5 decimal places (the 
default values). &P2 should be defined as 3 positions. 
Place any initial numeric value you wish in &P2. 


e Change the variable &P1 by dividing &P2 by &P1. 


¢ Monitor the CHGVAR command for a zero divide escape 
message, MCH1211, using MONMSG. 


¢ If MCH1211 is received, change variable &P1 to one (1) 
and re-execute the divide operation. 


When you are finished, return to the module and review vour an- 
swers with those in the text. 





Module 6. Message Handling 167 


Machine Exercise — Unit 4: Problem Determination with Message Handling 
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This machine exercise is intended to give you some additional 
practice with message handling commands. You will use mes- 
sage handling commands discussed throughout this module as 
well as other CL commands you have seen. 


Read through the entire exercise before you go to the work sta- 
tion so you know in advance what you are expected to do. If you 
wish, make any notes you feel will aid you as you perform the 
exercise. Be sure to substitute your initials for xxx. 


1. Sign on to the work station using the password S38IMPL. 


2. Select the option from the System/38 Implementation Topics 
Course Menu to display the Programmer's Menu. Be sure to 
enter your initials. (Note: Your own personal library should 
still be available from the previous exercise. If not, select the 
option from the Course Menu to create your library.) 


3. Modify your CL program, CLPxxx, from Step 6 of the pre- 
vious exercise (Question 6 from the Progress Check of Unit 
3) to do the following: 


After APO10 is done: 


© Use the CHKOBJ command to see if the program (*PGM) 
APO11 is in your library (ITLIBxxx). Monitor for the mes- 
sage CPF9801 (Object not found) coming from CHKOBQJ. 


— If CPF9801 is received, send the message ‘APO11 not 
in the library’ to your message queue (QUExxx) and 
copy APO11 into your library from the GLCITLIB library 
using the command (Create Duplicate Object): 


CRTDUPOBJ OBJ(APO11) FROMLIB(GLCITLIB) + 
OBJTYPE(*PGM) TOLIB(ITLIBxxx) 


(Hint: Use EXEC(DO) on the MONMSG command to 
control the SNDMSG and CRTDUPOBJ 
commands) 


© Call the program APO11, located in your library. 


Use option 8 of the Programmer Menu with the correct pa- 
rameter and Type entry to make your program changes. 


The coded solution for Unit 3 Progress Check Question 6 is 
shown on the next page for your reference. 


J 


SKIP: 


END: 


PGM /* Progress Check Question 6 */ 
DCL VAR(&RPLY) TYPE(*CHAR) LEN(1) 


SNDUSRMSG MSG('Do you want to update the Master + 
File? Enter Y for Yes, N for No.') + 
MSGTYPE(*INQ) + 
VALUES (Y N) + 
MSGRPY (&RPLY) 


IF COND(&RPLY *EQ N) THEN(GOTO SKIP) 


SNDPGMMSG MSGID(USROOOL) + 
MSGF (MSGSxxx.ITLIBxxx) + 
TOMSGQ (QUEXxx. ITLIBxxx) 


CALL APO10O0.ITLIBxxx 
GOTO END 
SNDPGMMSG MSGID(USROOO2) + 


MSGF (MSGSxxx.ITLIBxxx) + 
TOMSGQ (QUExxx. ITLIBxxx) 


ENDPGM 


4. Create an object for your CL program you just modified. Use 
option 3 of the Programmer’s Menu to do this. Be sure to 
use the correct parameter and Type entries. 


If you are informed an object with the same name already 
exists, press the Reset key and CF 11 to continue creating 
the object. The old version is replaced with your modified 
version. 


5. When the Message Waiting light appears on your work sta- 
tion, press CF 6 to display the message. 


e lf your job completed normally, press CF 8 and continue 
with Step 6. 


¢ If your job did not complete normally, press CF 8. Use 
your program listing to determine the error and start again 
with Step 3. 


6. Execute your program, CLPxxx, located in your library. 


7. When you are prompted, select the choice that indicates 
yes, you do want to update the Master File. 
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10. 


11. 


. When the message ‘APO10 has executed’ appears on the 2 


screen, press the Enter key to continue processing. 


. Display the System Request Menu. To do so: 


© Hold down the Shift key and press the Sys Req/Attn 
key 


© Press the Enter key 


The System Request Menu should now be on the screen. 


Display the messages in your message queue. To do so: 
© Key a 4 for the Option, 


@ Move the cursor to the Parameters field and key the 
qualified name of your message queue in your library 
(QUExxx.ITLIBxxx), 


© Press the Enter key 


Was APO11 in your library? The message display should tell 
you if it was not. 


Press the Enter key to end the message display and return 
to the System Request Menu. 


. Press CF 1 to return to your interrupted program. The Pro- 


gram Message display should be on the screen. 


. When the message ‘APOQ11 has executed’ appears on the 


screen, press the Enter key. The Programmer Menu should 
appear on the screen. 


. Display your message queue again. 


15. Delete all the messages from your message queue with 
CF 8. 


16. Return to the Course Menu by pressing CF 1. 


17. Select the option from the Course Menu to remove your 
exercise materials. 


18. Sign off the display station. Be sure to get your listings from 
the printer. 


The Administrator has a possible solution for the modified CL 
program should you want a copy. 


This completes the machine exercise. Continue with the Module 
Summary for Message Handling on the next page. 
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Module Summary — Message Handling ZY 
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The System/38 provides for message handling in many ways. 
Message handling is used to send and receive messages and for 
system/user communication. This module introduced you to Sys- 
tem/38 message handling concepts, terms, functions, and 
commands. 


Specifically, this module made you aware of 


¢ Different kinds of message queues 
— Work station 


— User 
— Job 
e Message queue delivery modes 
— Notify — Hold 
— Break — Default 
¢ Various types of messages, including 
— Informational — Request 
— Inquiry — Break 
— Completion — Escape 
e How you can send and display messages 
— SNDMSG — DSPMSG 
— SNDBRKMSG 
e How you can create, change, and delete message queues J 
— CRTMSGQ — DLTMSGQ 
— CHGMSGO 
e How you can create, change, and delete your own user-defined 
messages 
— CRTMSGF — DSPMSGF 
— ADDMSGD — DSPMSGD 
— CHGMSGD — RMVMSGD 
¢ How you can send and receive messages in a CL program 
— SNDUSRMSG — RCVMSG 
— SNDPGMMSG 


e Message handling provisions you can use for problem determi- 
nation, including 
— Job and history logs 
— MONMSG for escape, notify, and status messages 
— System Reply List 


Message handling functions and capabilities should be an integral 
part of any application you implement on your System/38. 


This completes your study of message handling. When you are 
ready, continue with the next module, Data Base Topics, by read- 
ing its Introduction on the next page. 





Cc Module 7. Data Base Topics 






WORK 
MANAGEMENT 
SAVE/ 
RESTORE 
CONTROL 
LANGUAGE 





In the System/38 Application Programming course, you learned 
about physical and logical files, and how to use data description 
specifications when creating data base files. 


In this module, you will learn additional functions available in data 
management. You will learn about ways to improve the perform- 
ance of file operations and ways of locking files from other run- 
ning jobs. You will learn about the many powerful capabilities of 
the copy command over and above just copying a file. You will 
see how you can prevent the loss of data when a file is disabled. 
You will learn how you can ensure that every file operation is 
successful in a multi-file transaction before the file changes are 
made permanent. 


~~ You will use the following materials in studying Data Base Topics: 
e The Module 7 text 
e The reference manuals listed below: 


1. IBM System/38 Control Language Reference Manual 
(SC21-7731) 


2. IBM System/38 Control Program Facility Programmer's 
Guide (SC21-7730) 


Begin your study of Data Base Topics in the Module 7 text now. 
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STUDENT NOTES: Module 7. Data Base Topics S) 


As you proceed through the study module, use these pages to record any notes you feel will 
help you understand the topic. 
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Cc STUDENT NOTES (continued): Data Base Topics 
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Progress Check — Unit 1: File Sharing 


Read each question carefully. Record your answers in the space 
ay provided. 


For Questions 1 through 5, indicate whether each statement is 
true (T) or false (F) 
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1. 


If one job allocates a file member *EXCL, another job can 
concurrently access the file member with an allocation of 
*SHRUP. 


If one job allocates a data area with *SHRNUP, another job 
can concurrently read the data area with an allocation of 
*SHRRD. 


Any outstanding lock states are removed at the end of a 
routing step. 


lf a file member is allocated *SHRRD, another job can con- 
currently read a record of the file member without issuing an 
allocation command. 


If an object is allocated more than once in a routing step you 
can remove the lock states with one deallocate command. 


List two benefits of sharing an open data path. 


In addition to an open data path, what other file resource 
can be shared? 


When you are finished, return to the module and review 


your answers with those in the text. 





J 
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Machine Exercise — Unit 2: Using the Copy Commands 


Read through the entire exercise before you go to the work sta- 
tion so you know in advance what you are expected to do. Make 
any notes, if you wish, to aid you when you are doing the 
exercise. 


This exercise demonstrates some of the more important capabili- 
ties of the CPYF command. Plus, you will use the CPYSRCF 
command. 


In this exercise, you create a new vendor master file after modi- 
fying its description (source member). You then move the data 
from the existing file to the new file. The primary purpose of this 
part of the exercise is to illustrate the use of the FMTOPT 
parameter. 


Next, you print the records in the new file. 
Finally, you print selected records from the file. 


Your Administrator has a solution for the copy commands you 
enter in doing the exercise. You should make every effort to do 
the exercise before looking at the solution. 


In doing the exercise, you should consider using CF 4 to get the 
command prompting displays for entering the parameter values. 
Always check your entries before pressing the Enter key. 


Note: Substitute your initials for xxx in the instructions. 


1. Sign on to a System/38 work station using the course pass- 
word S38IMPL. 


2. When the System/38 Implementation Course Menu appears, 
select option 1 and enter your initials to create your library, 
ITLIBxxx. 


3. When the Programmer Menu appears on the screen, get the 
Command Entry Display by pressing CF 3. 
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10. 


11. 


12. 


. Using the CPYSRCF command, copy the member named 


APPVEND from the source file GLCITSRC in the library 
GLCITLIB to your source file QDDSSRC in your library, 
ITLIBxxx. This is the DDS source for the accounts payable 
vendor master file, which is a physical file. 


24 records should be copied. 


. Return to the Programmer Menu with CF 1. 


. On the Programmer Menu, select Edit source with option 8 


and enter the name APPVEND for the first parameter (Parm:) 
and PF for the Type. 


. When the source for APPVEND is displayed, do the 


following: 

a. Move the cursor down to the field named VNDZIP. Use 
the line code P to get the prompt for this specification. 
Enter 9 in the length (Len) column. 

b. Delete the specification for the field named VNDCLS. 

c. Add a field after the last field. Name the field TRNDT and 
give it a length of 6 with O decimal places. Leave the 
data type column blank to default to packed. 


. Exit source editing by pressing CF1. 


. When the SEU EXIT display appears, update the member 


with option 2. Also, you may want to print the member. 


From the Programmer Menu, select option 3 to create a new 
physical vendor master file (APPVEND) in your library. Get 
the listing from the printer and verify that the compile was 
successful. 


Press CF 3 to get the Command Entry Display. 


Copy the records from the APPVEND file in the GLCITLIB 
library to the new and modified APPVEND file in your library, 
ITLIBxxx. The two key parameters you will use in this 
exercise are FMTOPT and MBROPT. You may want to 
review them in Unit 2 of the Module 7 text or in the Control 
Language reference manual (SC21-7731). 


A total of 47 records should be copied from the file. 


2 





13. 


14. 


15. 


16. 


17. 


18. 


19. 


20. 


Use the CPYF command to list the first six (6) data records 
in the new file, APPVEND, in your library, ITLIBxxx. Specify 
PRTFMT (*HEX). Get and examine your listing from the 
printer. 


Enter a CPYF command to list records from APPVEND in 
ITLIBxxx with a service rating (the SRVRTG field) of A and a 
delivery rating (the DELRTG field) of A. Specify 
PRTFMT(*CHAR). Get and examine your listing from the 
printer. The listing should have 15 records. 


Press CF 1 to return to the Programmer Menu. 
Press CF 6 to display messages. 

Press CF 8 to return to the Programmer Menu. 
Press CF 1 to return to the Course Menu. 


Select option 4 and enter your initials on the Course Menu to 
remove the exercise material. 


Sign off the display. Be sure you have removed all your list- 
ings from the printer. 


When you are finished with the exercise, continue with Unit 3, 
Using Journaling, in the Module 7 text. 
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Progress Check — Unit 3: Using Journaling JY 


Read each question carefully. Record your answers in the space 
aT provided. 


Indicate whether each of the following statements is true (T) or 
false (F). 
_ +1. ~~ journal entry is made for every file operation. 


___. 2. _ A journal entry is made for a record before it is written to 
the data file. 


____ 3. Journaling effectively gives a force write ratio of 1. 
—___ 4, Journaling prevents a file from being damaged. 

—____ 5. Specifying before-images is valid only with file update. 
—___. 6. + You can journal a file to more than one journal. 

___.. 7. You can only specify physical files to be journaled. 


_ 8. ~=An entry is made in a file’s journal when it is saved. 


When you are finished, return to the module and review your an- 
swers with those in the text. 
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Cc Progress Check — Unit 4: Using Commitment Control 


Read each question carefully. Record your answers in the space 
ay provided. 


Indicate whether each of the following statements is true (T) or 
false (F). 


—_____ 1. Journaling is a prerequisite for commitment control. 


__. 2. Program logic is used to determine if a multi-file transaction 
should be committed. 


_____. 3. ~The files whose operations are to be committed are locked 
from use by other jobs when the Begin Commitment Control 
(BGNCMTCTL) command is executed. 


____. 4. You have to specify journal before-images in order to use 
commitment control. 


When you are finished, return to the module and review your an- 
swers with those in the text. 
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Module 7 Summary — Data Base Topics 
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In this module you learned about additional data base capabilities 
available in the Control Program Facilities. 


With file sharing you added to your knowledge of sharing file re- 
sources by studying lock states and the sharing of an open data 
path. You learned that sharing an open data path, which is very 

simple to implement, results in the saving of memory and better 
performance during program execution. 


In your in-depth study of the Copy File (CPYF) command you 
learned about its many capabilities, probably the most important 
of which is to copy data to a file with a format different from the 
original file. Also, you learned that the CPYF command has very 
powerful record selection capabilities. 


You learned that you can use journaling to minimize the risk of 
losing data if a file were damaged. You saw how journaling 
worked and learned how to code the commands to implement 
and manage journaling. 


You learned that commitment control may be used for a transac- 
tion that involves multi-file operations and gives you the capability 
of having CPF restore the files to their original condition if the 
transaction cannot be completed successfully. 


This completes your study of Data Base Topics. Continue the 
course by reading the Module 8 Introduction on the next page. 
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Included with CPF are the functions you need to save objects 
outside your system and later restore them to your system. CPF 
provides functions to: 


¢« Save objects from the system by writing a copy of the objects 
to storage outside the system 


¢« Restore objects to the system that have previously been saved 


The Save/Restore operations provide you with a means to trans- 
fer information between internal (auxiliary) storage and external 
diskettes or magnetic tape. These save/restore facilities should 
be used to establish procedures to use to back up your system. 
These procedures should be designed and implemented as an in- 
tegral part of your system. The use of save/restore functions is 
essential for the proper maintenance of your system's files and 
wy objects. 


This module introduces you to the System/38 Save/Restore 
facilities. 


For your study of this module you will use: 
« The Module 8 text 


¢ System/38 Control Program Facility Programmer's Guide 
(SC21-7730) 


The next pages in this book are provided for any notes you may 
wish to take as you learn about save/restore on the System/38. 
Use them at your convenience. 


Begin your study of Save/Restore in the Module 8 text now. 
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STUDENT NOTES: Module 8. Save/Restore aa 


As you proceed through the study module, use these pages to record any notes you feel will 
help you understand the topic. 
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C STUDENT NOTES (continued): Save/Restore 
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Progress Check — Unit 1: Save/Restore Concepts 


Read each question carefully. Record your answers in the space 
aT | provided. 


1. List any four of the six items you can save and restore with 
the Save/Restore functions of the System/38. 


2. Code the CL command and its parameters needed to initial- 
ize the diskettes in magazine slot *M2 to save/restore for- 
mat. The diskettes should have a volume identifier of 
SYSTM. Check to see if the diskettes contain any active 
files. 


3. Asaresult of executing the initialization command of Ques- 
tion 2, what is the complete volume identifier of the diskette 
in slot 5 of the magazine? 


4. Code the CL command to list the names of all the files on 
the diskettes in the first two single slots of the diskette 
drive. 


Skip Questions 5 and 6 if you did not study the section on Mag- 
netic Tape in the unit. 


5. Code the CL command and its parameters needed to initial- 
ize the tape mounted on the tape device named QTAPES. 
Give the tape a volume label of SYSTM and check to see if 
any active files are on the tape. 
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6. Code the CL command to display the names of any files re- 
corded on the tape mounted on the tape device QTAPES. 


7. List 3 pieces of save/restore status information the System/38 


keeps about an object. 


8. What happens to an object in auxiliary storage when you 
save it to diskette or tape? 


What happens to the version of an object in auxiliary stor- 
age when you restore a saved copy of it? 


When you are finished, return to the module and review your an- 
swers with those in the text. 
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Progress Check — Unit 2: Saving Information 


Read each question carefully. Record your answers in the space 

provided. For any command coding, code only the parameters 
you feel are necessary to answer the question as It is stated and 
use parameter defaults as appropriate. 


1. List the four CL commands used to save objects and 
libraries. 


2. List three objects that cannot be saved. 


3. Code the command to save all the objects in the library 
GLLIB that have changed since the last time the library was 
saved. The objects should be saved on diskettes named 
GLSAV. 


4. Code the command to save the libraries GLLIB, ARLIB, and 
INLIB on diskettes. Use whatever diskettes are in the dis- 
kette drive, but clear any uncleared diskettes found. Check 
to see if all the objects can be allocated to the save 
operation. 
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5. Code the command to save the programs GLLIST, GLUPD, 
and GLCHK in the library GLLIB on diskette. Free the storage 
of these objects when the save is complete. Use whatever 
diskettes are in the diskette drive and clear any uncleared 
diskettes. 


6. List the steps you would perform to save your entire 
system. 


When you are finished, return to the module and review your an- 
wv 38 swers with those in the text. 
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Progress Check — Unit 3: Restoring Information 2 


Read each question carefully. Record your answers in the space 

Lae provided. For any command coding, code only the parameters 
you feel are necessary to answer the question as it is stated and 
use parameter defaults as appropriate. 


1. What two restore commands are used only when you are 
restoring your saved system? 


2. Code the command to restore the saved library ARLIB from 
diskette to a library named ARAPP. Restore the version of 
ARLIB saved on 05/01/84 to a diskette with a volume iden- 
tifier of ARSAV. 


3. Code the command to restore all the programs beginning 
with AP and GL. They were originally saved from and are to 
be restored to a library named FINANCE. Restore only those 
objects whose storage was freed when they were saved. 
The objects were saved on diskette. J 


4. Code the command to restore user profiles from the tape 
mounted on the tape device named QTAPE2. 


5. List in the correct order the steps you would perform to re- 
store your entire system. 


When you are finished, return to the module and review your an- : 
swers with those in the text. 
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Progress Check — Unit 4: Save/Restore Considerations 


ea Read each question carefully. Record your answers in the space 
provided. 


1. List four factors that influence overall performance with 
save/restore functions. 


2. List two save/restore functions that require the System/38 
to be dedicated. 


3. List four factors you should take into consideration when 
you develop your save/restore strategy. 


4. What happens if you restore an object whose owner does 
not exist in the system? 


What happens if you attempt to restore an object over an 
existing object and the owner name in the system and the 
owner name recorded with the saved version are different? 


When you are finished, return to the module and review your an- 
swers with those in the text. 
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Module Summary — Save/Restore 
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The System/38 save/restore functions provide you with the ca- 
pability to copy vital system information onto diskette or tape. 
Should CPF programming, user programs, or data be lost as the 
result of a failure, you have the procedures to restore them to the 
system in order to continue your operation. 


To provide a backup of your system, you use the Save com- 
mands (SAVLIB, SAVOBJ, SAVCHGOBJ, SAVSYS) to copy infor- 
mation to diskettes or magnetic tape. To return the saved 
information to the system, you use the Restore commands 
(RSTLIB, RSTOBJ, RSTUSRPRF, RSTAUT). Remember, you must 
re-install CPF to restore your entire system, however. 


Save/restore functions use either diskette or tape. Diskettes must 
be initialized to the save/restore format using the INZDKT com- 
mand. Tapes must be initialized with a standard label using 
INZTAP. lf you are saving your entire system to tape, remember 
to have one diskette available to receive CPF programs to start 
the restore operation. 


You must design a save/restore strategy for your System/38. As 
you do so, you must evaluate the save/restore options, online 
backup and journaling. You also must consider performance and 
security factors. No single approach addresses all your applica- 
tion needs. Study your operational requirements and resources 
and ask yourself ‘‘How long can | afford to be down?” 


When you are ready, continue with the Course Summary on the 
next page. 


J 
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Implementation Topics Summary 


If you look back over the modules you studied in this course, you 
can see the role each topic plays in the implementation of your 
System/38: 


EB System Installation...device configuration, program product 
installation, and system tailoring to get a usable system 


Security...how to control access to your system and protect 
it from unauthorized use 


S 


Work Management...how work management operates and 
how you can change various work management objects 


co) 


Control Language Programming...how to code CL programs 
and use them to control an application 


Source Entry Utility...how to use additional SEU functions, 
including Services operations and Exit display options 


Message Handling...communication between users, the sys- 
tem and a user, and a program and a user 


Data Base...file creation and usage considerations 


Save/Restore...protecting your programs and data once 
your system and applications are implemented 


You are now aware of the tasks necessary to implement your 
System/38. You are familiar with the available reference material 
to help you complete these tasks and to provide further study. 
You should now be ready to select your operating environment 
and begin to implement it. 


You have no more Progress Checks. Your next ‘test’ is the actual 
implementation of your System/38. This course was intended to 
help you identify and plan for the pieces necessary for the imple- 
mentation effort. With the knowledge you now have, your Sys- 
tem/38 reference manuals as guides, and your IBM 
representative as a consultant, you should have a successful 
installation. 


At this time, complete any notes here in your Student 


Materials Book, return any modules to your Administrator, 
and complete any end-of-course activity. 





Congratulations on the completion of this important part of your 
System/38 education. Refer to the System/38 curriculum 
flowchart in Section II for your next course. 
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Appendix A 


System/38 Curriculum Overview 


Guided Learning Center Course Offerings 


System/38 Fundamentals 


available System/38 Guided Learning Center courses. 


Module 1. Course Introduction 
Hardware Overview 
Software Overview 


Module 2. Data Base Data Management 
Data Base Data Management Introduction 
Building the Data Base 
Additional Topics on Building Data Base 


Module 3. Work Station Data Management 
Work Station Overview 
Work Station Implementation 


Module 4. Control Language 
Control Language and CL Programs 


Module 5. Programmer Services — Utilities 
Interactive Data Base Utilities 


Module 6. Programmer Services — Languages and Aids 
High Level Languages 
Programmer Productivity Aids 


Module 7. Object Management and Work Management 
Object Management 
Work Management 


Module 8. System Service Facilities 
System Service Facilities (Security, Save/Restore) 
Conversion and Installation Facilities 


Appendix A 


The following list shows the major topics of each module for the 


195 


System/38 Application Programming 
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Module 1. Course Introduction 
Course Overview 
IBM System/38 Reference Library 
Familiarization Exercise 


Module 2. System/38 Review 
System/38 Review — CPF 
Review Questions 


Module 3. System/38 Operation 
The Command Entry Display 
The Programmer Menu 


Module 4. Building the Data Base 
Review of Data Base Concepts 
Data Description Specifications 
Transferring DDS to Machine Readable Media 


Module 5. Introduction to Interactive Processing 
Fundamentals of Interactive Processing 


Module 6. Data File Utility 
Introducing DFU 
How to Design/Create a DFU Application 
How to Execute a DFU Application 
How to Change a DFU Application 
How to Delete a DFU Application 


Module 7. Display Files 
Concepts of Display Files 
Creating Simple Display Files 
Creating More Complex Display Files 


Module 8. RPG Ill Interactive Programs 
RPG Ill for Simple Display Files 
RPG Ill for More Complex Display Files 


Module 9. COBOL Interactive Programs 
COBOL for Simple Display Files 
COBOL for More Complex Display Files 


Module 10. Introduction to Batch Processing 
Fundamentals of Batch Processing 
How to Run a Batch Job 


Module 11. RPG Ill Batch Programming 
RPG Ill for Batch Programming 


Module 12. COBOL Batch Programming 
COBOL for Batch Programming 


c 





System/38 Application Programming 


Module 13. The Query Facility 
Introducing Query 
Application Creation and Execution 
Modifying a Query Application 


Module 14. DEBUG Facilities 
Purpose of Debug Mode 
Operations in Debug Mode 


Module 15. Control Language Programs 
Concepts of Control Language Programs 
CL Programs for Menu Driven Applications 


Module 16. Screen Design Aid 
Introducing SDA 
SDA for Testing Display Files 
SDA for Creating Menus 
SDA for Creating Display Formats 
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System/38 FPG Iil and Structured Programming 


Module 1. Course Introduction 
Course Overview 
Prerequisite Review 


Module 2. Procedural File Operations 
File Processing 
File Processing Operation Codes 


Module 3. Structured Programming Concepts 
Fundamentals of Structured Programming 


Module 4. Structured Programming Implementation 
Structured Programming Operation Codes 
Developing a Structured Program 


Module 5. Program Compilation and Testing 
Compiling, Testing, and Debugging Programs 


Module 6. Subprograms 
RPG Ill External Subroutines 


Module 7. Subfile Programming 
Subfile Coding — Inquiry 
Subfile Coding — Update 


Module 8. Data Areas 
Use and Coding of Data Areas 


Module 9. Data Structures 
Use and Coding of Data Structures 


Module 10. Handling Exception Errors 
How to Handle Exception Errors in Programs 


Module 11. Additional RPG Ill Functions 
RPG Enhancements 
Multiple Device Files 
Commitment Control 


Module 12. Program Described Work Station Files 
How to Describe Work Station Files Within a Program 


Module 13. Printer Device Files 
Externally Described Printer Files 
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System/38 Implementation Topics 


Module 1. System Installation 
Pre-installation 
Installing Your System 
Post-installation 


Module 2. Security 
Physical Security 
System Security 
System Security Implementation 


Module 3. Work Management 
Concepts 
Interactive Job Processing 
Batch Job Processing 
Considerations 


Module 4. Control Language Programming 
Using and Coding CL Programs 
Communicating Between Programs 
Creating Objects with CL Programs 
Character String Operations 
Data Areas 
Retrieving System Values and Job Status 


Module 5. Source Entry Utility Additional Topics 
Services Display Operations 
Exit Display Options 
Insert Skeleton 


Module 6. Message Handling 
Basic Message Handling 
Creating User Message Queues and Message Files 
Message Handling with CL Programs 
Problem Determination with Message Handling 


Module 7. Data Base Topics 
File Sharing 
Copy Commands 
Journaling 
Commitment Control 


Module 8. Save/Restore 
Save/Restore Concepts 
Saving Information 
Restoring Information 
Save/Restore Considerations 
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Appendix B. System Configuration Objects 


To verify the names of the system configuration objects for your 
system configuration (once CPF is loaded and started), use the 
Display Device Configuration (DSPDEVCFG) command. 


The device descriptions for the system console and the diskette 
magazine drive are supplied with CPF. 


For additional information: 


e Use the Display Device Description (DSPDEVD) command to 
display the parameter values specified for a particular device 
description. 


e Use the Display Control Unit Description (DSPCUD) command 
to display the parameter values specified for a particular 
control unit description. 


The following tables show the commands used to create the 
system configuration objects. For example, to create a diskette 
magazine drive, enter: 


CRTDEVD DEVD(QDKT) DEVADR(000012) 
DEVTYPE(72MD) MODEL(1001) TEXT('Diskette Drive') 


CONTROL UNIT DESCRIPTIONS 


The following chart omits parameters for which the default is 
taken. 


CRTCUD 
Command Magnetic Tape Control 
Parameters Work Station Controllers Units 


CUD QTAPE QTAPEA 
TYPE 3411 3430 


MODEL 1,2,or3 | AO 
CTLADR 0015 0052 
DTACPR N/A See note 


Note: If hardware data compression feature is installed, DIACPR parameter value must be *YES. 
lf hardware data compression feature is not installed, must be *NO. 
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DEVICE DESCRIPTIONS J 


The following chart omits parameters for which the default is 
taken. 


CRTDEVD Diskette 
Command | System Magazine Card 
Parameters | Console Drive System Printers Device 


DEVD QCONSOLE| QDKT QSYSPRT QSYSPRT2 QCARD96 


DEVADR 000002 000012 3262 or 000018 | 32620r 000058 | 000019 
5211 5211 
3203 000040 | 3203 000041 or 
000040 


DEVTYPE 3203, 3262 of 5211 | 3203, 3262, or 5211 | 5424 


MODEL Ai, B1, 2, or 5 A1, B1, 2, or 5 Ai, A2, 
K1, K2, or 
K3 


PRTIMG QSYSIMAGE.QGPL | QSYSIMAGE.QGPL | — 
(see note) 


TEXT ‘System ‘Diskette *BLANK *BLANK 
Console’ Device’ 


Note: If QSYSPRT2 has a different print belt or print train, it must have a different print image 
(PRTIMG parameter). This can be OSYSIMAGE2.QGPL. 


CRTDEVD : 
Comman ) 
Parameters Magnetic Tape Drives 

DEVD QTAPE1 | QTAPE2 | QTAPE3 | QTAPE4 | QTAPES | QTAPE6 | QTAPE7 | QTAPE8 

DEVADR 000015 | 010015 | 020015 | 030015 | 000052 | 010052 | 020052 | 030052 

DEVTYPE 3410 3410 3410 3410 3430 3430 3430 3430 

MODEL See note | See note | See note | See note | A01 B01 BO1 BO1 

CTLU QTAPE | QTAPE | QTAPE | QTAPE | QTAPEA | QTAPEA | QTAPEA | QTAPEA 


Note: MODEL must be same model number as 3411 Control Unit to which 3410 tape drive is 
attached. 





as a . . Sa camcige, on vate 
a 4 Tt, 08 6.0 3 ot LAA Le-y5 Pvt fe .- LLL ae  h.3 ( Ce ph nyt a 
< 1 , f | 
2 A f ‘ \ / m x4 r ” aw /}} rh oy? ie 3 
p yesh frthe f Dur sl evans | Pase FO fhe ‘ai hhh , LEQ OV LILY 
Nucl j set s “e ? ¥ 
i if 


fy 
i 


; : : / : = f : j “A as ei 
fry dhe pront Lonbtese cooceesl 6T Re fe Leake AL AAS sr a is PEI ye. 


Pp 


i j > * 
fp . | f , : ae) a. i go tev & 
Rtn ta Liv Cfh.c4 tm £08 ra p waa’ & ) Bite dee - fr Ae ef j- ee ¢ 
Mi - 


a 7 . te Pee 
Wnage Kas ar Wa vee Ay SY AGED « 
‘ 


202 ZR30-1020 





vw 


ZR30-1020-03 


WING 


~ 














